mirror of
https://github.com/tcsenpai/UWINE.git
synced 2025-06-06 19:45:20 +00:00
remove var folder -- it's auto generated for tmp storage when the container runs
This commit is contained in:
parent
1f1816bbe0
commit
defadb0717
@ -1 +0,0 @@
|
||||
usr/.ref
|
@ -1 +0,0 @@
|
||||
usr/bin
|
@ -1 +0,0 @@
|
||||
usr/etc
|
@ -1 +0,0 @@
|
||||
usr/lib
|
@ -1 +0,0 @@
|
||||
usr/lib32
|
@ -1 +0,0 @@
|
||||
usr/lib64
|
@ -1 +0,0 @@
|
||||
usr/lib/pressure-vessel/overrides
|
@ -1 +0,0 @@
|
||||
usr/sbin
|
@ -1 +0,0 @@
|
||||
.
|
Binary file not shown.
Binary file not shown.
Binary file not shown.
@ -1 +0,0 @@
|
||||
mawk
|
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
@ -1,274 +0,0 @@
|
||||
#!/bin/sh -
|
||||
#
|
||||
# bashbug - create a bug report and mail it to the bug address
|
||||
#
|
||||
# The bug address depends on the release status of the shell. Versions
|
||||
# with status `devel', `alpha', `beta', or `rc' mail bug reports to
|
||||
# chet@cwru.edu and, optionally, to bash-testers@cwru.edu.
|
||||
# Other versions send mail to bug-bash@gnu.org.
|
||||
#
|
||||
# Copyright (C) 1996-2020 Free Software Foundation, Inc.
|
||||
#
|
||||
# This program is free software: you can redistribute it and/or modify
|
||||
# it under the terms of the GNU General Public License as published by
|
||||
# the Free Software Foundation, either version 3 of the License, or
|
||||
# (at your option) any later version.
|
||||
#
|
||||
# This program is distributed in the hope that it will be useful,
|
||||
# but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
# GNU General Public License for more details.
|
||||
#
|
||||
# You should have received a copy of the GNU General Public License
|
||||
# along with this program. If not, see <http://www.gnu.org/licenses/>.
|
||||
|
||||
#
|
||||
# configuration section:
|
||||
# these variables are filled in by the make target in Makefile
|
||||
#
|
||||
MACHINE="x86_64"
|
||||
OS="linux-gnu"
|
||||
CC="gcc"
|
||||
CFLAGS="-g -O2 -fstack-protector-strong -Wformat -Werror=format-security -Wall "
|
||||
RELEASE="5.1"
|
||||
PATCHLEVEL="4"
|
||||
RELSTATUS="release"
|
||||
MACHTYPE="x86_64-pc-linux-gnu"
|
||||
|
||||
PATH=/bin:/usr/bin:/usr/local/bin:$PATH
|
||||
export PATH
|
||||
|
||||
# Check if TMPDIR is set, default to /tmp
|
||||
: ${TMPDIR:=/tmp}
|
||||
|
||||
#Securely create a temporary directory for the temporary files
|
||||
TEMPDIR=$TMPDIR/bbug.$$
|
||||
(umask 077 && mkdir "$TEMPDIR") || {
|
||||
echo "$0: could not create temporary directory" >&2
|
||||
exit 1
|
||||
}
|
||||
|
||||
TEMPFILE1=$TEMPDIR/bbug1
|
||||
TEMPFILE2=$TEMPDIR/bbug2
|
||||
|
||||
USAGE="Usage: $0 [--help] [--version] [bug-report-email-address]"
|
||||
VERSTR="GNU bashbug, version ${RELEASE}.${PATCHLEVEL}-${RELSTATUS}"
|
||||
|
||||
do_help= do_version=
|
||||
|
||||
while [ $# -gt 0 ]; do
|
||||
case "$1" in
|
||||
--help) shift ; do_help=y ;;
|
||||
--version) shift ; do_version=y ;;
|
||||
--) shift ; break ;;
|
||||
-*) echo "bashbug: ${1}: invalid option" >&2
|
||||
echo "$USAGE" >&2
|
||||
exit 2 ;;
|
||||
*) break ;;
|
||||
esac
|
||||
done
|
||||
|
||||
if [ -n "$do_version" ]; then
|
||||
echo "${VERSTR}"
|
||||
exit 0
|
||||
fi
|
||||
|
||||
if [ -n "$do_help" ]; then
|
||||
echo "${VERSTR}"
|
||||
echo "${USAGE}"
|
||||
echo
|
||||
cat << HERE_EOF
|
||||
Bashbug is used to send mail to the Bash maintainers
|
||||
for when Bash doesn't behave like you'd like, or expect.
|
||||
|
||||
Bashbug will start up your editor (as defined by the shell's
|
||||
EDITOR environment variable) with a preformatted bug report
|
||||
template for you to fill in. The report will be mailed to the
|
||||
bug-bash mailing list by default. See the manual for details.
|
||||
|
||||
If you invoke bashbug by accident, just quit your editor without
|
||||
saving any changes to the template, and no bug report will be sent.
|
||||
HERE_EOF
|
||||
exit 0
|
||||
fi
|
||||
|
||||
# Figure out how to echo a string without a trailing newline
|
||||
N=`echo 'hi there\c'`
|
||||
case "$N" in
|
||||
*c) n=-n c= ;;
|
||||
*) n= c='\c' ;;
|
||||
esac
|
||||
|
||||
BASHTESTERS="bash-testers@cwru.edu"
|
||||
|
||||
case "$RELSTATUS" in
|
||||
alpha*|beta*|devel*|rc*) BUGBASH=chet@cwru.edu ;;
|
||||
*) BUGBASH=bug-bash@gnu.org ;;
|
||||
esac
|
||||
|
||||
case "$RELSTATUS" in
|
||||
alpha*|beta*|devel*|rc*)
|
||||
echo "$0: This is a testing release. Would you like your bug report"
|
||||
echo "$0: to be sent to the bash-testers mailing list?"
|
||||
echo $n "$0: Send to bash-testers? $c"
|
||||
read ans
|
||||
case "$ans" in
|
||||
y*|Y*) BUGBASH="${BUGBASH},${BASHTESTERS}" ;;
|
||||
esac ;;
|
||||
esac
|
||||
|
||||
BUGADDR="${1-$BUGBASH}"
|
||||
|
||||
if [ -z "$DEFEDITOR" ] && [ -z "$EDITOR" ]; then
|
||||
if [ -x /usr/bin/editor ]; then
|
||||
DEFEDITOR=editor
|
||||
elif [ -x /usr/local/bin/ce ]; then
|
||||
DEFEDITOR=ce
|
||||
elif [ -x /usr/local/bin/emacs ]; then
|
||||
DEFEDITOR=emacs
|
||||
elif [ -x /usr/contrib/bin/emacs ]; then
|
||||
DEFEDITOR=emacs
|
||||
elif [ -x /usr/bin/emacs ]; then
|
||||
DEFEDITOR=emacs
|
||||
elif [ -x /usr/bin/xemacs ]; then
|
||||
DEFEDITOR=xemacs
|
||||
elif [ -x /usr/bin/nano ]; then
|
||||
DEFEDITOR=nano
|
||||
elif [ -x /usr/contrib/bin/jove ]; then
|
||||
DEFEDITOR=jove
|
||||
elif [ -x /usr/local/bin/jove ]; then
|
||||
DEFEDITOR=jove
|
||||
elif [ -x /usr/bin/vi ]; then
|
||||
DEFEDITOR=vi
|
||||
else
|
||||
echo "$0: No default editor found: attempting to use vi" >&2
|
||||
DEFEDITOR=vi
|
||||
fi
|
||||
fi
|
||||
|
||||
|
||||
: ${EDITOR=$DEFEDITOR}
|
||||
|
||||
: ${USER=${LOGNAME-`whoami`}}
|
||||
|
||||
trap 'rm -rf "$TEMPDIR"; exit 1' 1 2 3 13 15
|
||||
trap 'rm -rf "$TEMPDIR"' 0
|
||||
|
||||
UN=
|
||||
if (uname) >/dev/null 2>&1; then
|
||||
UN=`uname -a`
|
||||
fi
|
||||
|
||||
if [ -f /usr/lib/sendmail ] ; then
|
||||
RMAIL="/usr/lib/sendmail"
|
||||
SMARGS="-i -t"
|
||||
elif [ -f /usr/sbin/sendmail ] ; then
|
||||
RMAIL="/usr/sbin/sendmail"
|
||||
SMARGS="-i -t"
|
||||
else
|
||||
RMAIL=rmail
|
||||
SMARGS="$BUGADDR"
|
||||
fi
|
||||
|
||||
INITIAL_SUBJECT='[50 character or so descriptive subject here (for reference)]'
|
||||
|
||||
cat > "$TEMPFILE1" <<EOF
|
||||
From: ${USER}
|
||||
To: ${BUGADDR}
|
||||
Subject: ${INITIAL_SUBJECT}
|
||||
|
||||
Configuration Information [Automatically generated, do not change]:
|
||||
Machine: $MACHINE
|
||||
OS: $OS
|
||||
Compiler: $CC
|
||||
Compilation CFLAGS: $CFLAGS
|
||||
uname output: $UN
|
||||
Machine Type: $MACHTYPE
|
||||
|
||||
Bash Version: $RELEASE
|
||||
Patch Level: $PATCHLEVEL
|
||||
Release Status: $RELSTATUS
|
||||
|
||||
Description:
|
||||
[Detailed description of the problem, suggestion, or complaint.]
|
||||
|
||||
Repeat-By:
|
||||
[Describe the sequence of events that causes the problem
|
||||
to occur.]
|
||||
|
||||
Fix:
|
||||
[Description of how to fix the problem. If you don't know a
|
||||
fix for the problem, don't include this section.]
|
||||
EOF
|
||||
|
||||
cp "$TEMPFILE1" "$TEMPFILE2"
|
||||
chmod u+w "$TEMPFILE1"
|
||||
|
||||
trap '' 2 # ignore interrupts while in editor
|
||||
|
||||
edstat=1
|
||||
while [ $edstat -ne 0 ]; do
|
||||
$EDITOR "$TEMPFILE1"
|
||||
edstat=$?
|
||||
|
||||
if [ $edstat -ne 0 ]; then
|
||||
echo "$0: editor \`$EDITOR' exited with nonzero status."
|
||||
echo "$0: Perhaps it was interrupted."
|
||||
echo "$0: Type \`y' to give up, and lose your bug report;"
|
||||
echo "$0: type \`n' to re-enter the editor."
|
||||
echo $n "$0: Do you want to give up? $c"
|
||||
|
||||
read ans
|
||||
case "$ans" in
|
||||
[Yy]*) exit 1 ;;
|
||||
esac
|
||||
|
||||
continue
|
||||
fi
|
||||
|
||||
# find the subject from the temp file and see if it's been changed
|
||||
CURR_SUB=`grep '^Subject: ' "$TEMPFILE1" | sed 's|^Subject:[ ]*||' | sed 1q`
|
||||
|
||||
case "$CURR_SUB" in
|
||||
"${INITIAL_SUBJECT}")
|
||||
echo
|
||||
echo "$0: You have not changed the subject from the default."
|
||||
echo "$0: Please use a more descriptive subject header."
|
||||
echo "$0: Type \`y' to give up, and lose your bug report;"
|
||||
echo "$0: type \`n' to re-enter the editor."
|
||||
echo $n "$0: Do you want to give up? $c"
|
||||
|
||||
read ans
|
||||
case "$ans" in
|
||||
[Yy]*) exit 1 ;;
|
||||
esac
|
||||
|
||||
echo "$0: The editor will be restarted in five seconds."
|
||||
sleep 5
|
||||
edstat=1
|
||||
;;
|
||||
esac
|
||||
|
||||
done
|
||||
|
||||
trap 'rm -rf "$TEMPDIR"; exit 1' 2 # restore trap on SIGINT
|
||||
|
||||
if cmp -s "$TEMPFILE1" "$TEMPFILE2"
|
||||
then
|
||||
echo "File not changed, no bug report submitted."
|
||||
exit
|
||||
fi
|
||||
|
||||
echo $n "Send bug report to ${BUGADDR}? [y/n] $c"
|
||||
read ans
|
||||
case "$ans" in
|
||||
[Nn]*) exit 0 ;;
|
||||
esac
|
||||
|
||||
${RMAIL} $SMARGS < "$TEMPFILE1" || {
|
||||
cat "$TEMPFILE1" >> $HOME/dead.bashbug
|
||||
echo "$0: mail to ${BUGADDR} failed: report saved in $HOME/dead.bashbug" >&2
|
||||
echo "$0: please send it manually to ${BUGADDR}" >&2
|
||||
}
|
||||
|
||||
exit 0
|
@ -1,248 +0,0 @@
|
||||
#!/usr/bin/perl
|
||||
|
||||
# WARNING: do not edit!
|
||||
# Generated by Makefile from ../tools/c_rehash.in
|
||||
# Copyright 1999-2022 The OpenSSL Project Authors. All Rights Reserved.
|
||||
#
|
||||
# Licensed under the OpenSSL license (the "License"). You may not use
|
||||
# this file except in compliance with the License. You can obtain a copy
|
||||
# in the file LICENSE in the source distribution or at
|
||||
# https://www.openssl.org/source/license.html
|
||||
|
||||
# Perl c_rehash script, scan all files in a directory
|
||||
# and add symbolic links to their hash values.
|
||||
|
||||
my $dir = "/usr/lib/ssl";
|
||||
my $prefix = "/usr";
|
||||
|
||||
my $errorcount = 0;
|
||||
my $openssl = $ENV{OPENSSL} || "openssl";
|
||||
my $pwd;
|
||||
my $verbose = 0;
|
||||
my $symlink_exists=eval {symlink("",""); 1};
|
||||
my $removelinks = 1;
|
||||
|
||||
## Parse flags.
|
||||
while ( $ARGV[0] =~ /^-/ ) {
|
||||
my $flag = shift @ARGV;
|
||||
last if ( $flag eq '--');
|
||||
if ( $flag eq '-h' || $flag eq '-help' ) {
|
||||
help();
|
||||
} elsif ( $flag eq '-n' ) {
|
||||
$removelinks = 0;
|
||||
} elsif ( $flag eq '-v' ) {
|
||||
$verbose++;
|
||||
}
|
||||
else {
|
||||
print STDERR "Usage error; try -h.\n";
|
||||
exit 1;
|
||||
}
|
||||
}
|
||||
|
||||
sub help {
|
||||
print "Usage: c_rehash [-old] [-h] [-help] [-v] [dirs...]\n";
|
||||
print " -old use old-style digest\n";
|
||||
print " -h or -help print this help text\n";
|
||||
print " -v print files removed and linked\n";
|
||||
exit 0;
|
||||
}
|
||||
|
||||
eval "require Cwd";
|
||||
if (defined(&Cwd::getcwd)) {
|
||||
$pwd=Cwd::getcwd();
|
||||
} else {
|
||||
$pwd=`pwd`;
|
||||
chomp($pwd);
|
||||
}
|
||||
|
||||
# DOS/Win32 or Unix delimiter? Prefix our installdir, then search.
|
||||
my $path_delim = ($pwd =~ /^[a-z]\:/i) ? ';' : ':';
|
||||
$ENV{PATH} = "$prefix/bin" . ($ENV{PATH} ? $path_delim . $ENV{PATH} : "");
|
||||
|
||||
if (! -x $openssl) {
|
||||
my $found = 0;
|
||||
foreach (split /$path_delim/, $ENV{PATH}) {
|
||||
if (-x "$_/$openssl") {
|
||||
$found = 1;
|
||||
$openssl = "$_/$openssl";
|
||||
last;
|
||||
}
|
||||
}
|
||||
if ($found == 0) {
|
||||
print STDERR "c_rehash: rehashing skipped ('openssl' program not available)\n";
|
||||
exit 0;
|
||||
}
|
||||
}
|
||||
|
||||
if (@ARGV) {
|
||||
@dirlist = @ARGV;
|
||||
} elsif ($ENV{SSL_CERT_DIR}) {
|
||||
@dirlist = split /$path_delim/, $ENV{SSL_CERT_DIR};
|
||||
} else {
|
||||
$dirlist[0] = "$dir/certs";
|
||||
}
|
||||
|
||||
if (-d $dirlist[0]) {
|
||||
chdir $dirlist[0];
|
||||
$openssl="$pwd/$openssl" if (!-x $openssl);
|
||||
chdir $pwd;
|
||||
}
|
||||
|
||||
foreach (@dirlist) {
|
||||
if (-d $_ ) {
|
||||
if ( -w $_) {
|
||||
hash_dir($_);
|
||||
} else {
|
||||
print "Skipping $_, can't write\n";
|
||||
$errorcount++;
|
||||
}
|
||||
}
|
||||
}
|
||||
exit($errorcount);
|
||||
|
||||
sub copy_file {
|
||||
my ($src_fname, $dst_fname) = @_;
|
||||
|
||||
if (open(my $in, "<", $src_fname)) {
|
||||
if (open(my $out, ">", $dst_fname)) {
|
||||
print $out $_ while (<$in>);
|
||||
close $out;
|
||||
} else {
|
||||
warn "Cannot open $dst_fname for write, $!";
|
||||
}
|
||||
close $in;
|
||||
} else {
|
||||
warn "Cannot open $src_fname for read, $!";
|
||||
}
|
||||
}
|
||||
|
||||
sub hash_dir {
|
||||
my $dir = shift;
|
||||
my %hashlist;
|
||||
|
||||
print "Doing $dir\n";
|
||||
|
||||
if (!chdir $dir) {
|
||||
print STDERR "WARNING: Cannot chdir to '$dir', $!\n";
|
||||
return;
|
||||
}
|
||||
|
||||
opendir(DIR, ".") || print STDERR "WARNING: Cannot opendir '.', $!\n";
|
||||
my @flist = sort readdir(DIR);
|
||||
closedir DIR;
|
||||
if ( $removelinks ) {
|
||||
# Delete any existing symbolic links
|
||||
foreach (grep {/^[\da-f]+\.r{0,1}\d+$/} @flist) {
|
||||
if (-l $_) {
|
||||
print "unlink $_\n" if $verbose;
|
||||
unlink $_ || warn "Can't unlink $_, $!\n";
|
||||
}
|
||||
}
|
||||
}
|
||||
FILE: foreach $fname (grep {/\.(pem)|(crt)|(cer)|(crl)$/} @flist) {
|
||||
# Check to see if certificates and/or CRLs present.
|
||||
my ($cert, $crl) = check_file($fname);
|
||||
if (!$cert && !$crl) {
|
||||
print STDERR "WARNING: $fname does not contain a certificate or CRL: skipping\n";
|
||||
next;
|
||||
}
|
||||
link_hash_cert($fname) if ($cert);
|
||||
link_hash_crl($fname) if ($crl);
|
||||
}
|
||||
|
||||
chdir $pwd;
|
||||
}
|
||||
|
||||
sub check_file {
|
||||
my ($is_cert, $is_crl) = (0,0);
|
||||
my $fname = $_[0];
|
||||
|
||||
open(my $in, "<", $fname);
|
||||
while(<$in>) {
|
||||
if (/^-----BEGIN (.*)-----/) {
|
||||
my $hdr = $1;
|
||||
if ($hdr =~ /^(X509 |TRUSTED |)CERTIFICATE$/) {
|
||||
$is_cert = 1;
|
||||
last if ($is_crl);
|
||||
} elsif ($hdr eq "X509 CRL") {
|
||||
$is_crl = 1;
|
||||
last if ($is_cert);
|
||||
}
|
||||
}
|
||||
}
|
||||
close $in;
|
||||
return ($is_cert, $is_crl);
|
||||
}
|
||||
|
||||
sub compute_hash {
|
||||
my $fh;
|
||||
if ( $^O eq "VMS" ) {
|
||||
# VMS uses the open through shell
|
||||
# The file names are safe there and list form is unsupported
|
||||
if (!open($fh, "-|", join(' ', @_))) {
|
||||
print STDERR "Cannot compute hash on '$fname'\n";
|
||||
return;
|
||||
}
|
||||
} else {
|
||||
if (!open($fh, "-|", @_)) {
|
||||
print STDERR "Cannot compute hash on '$fname'\n";
|
||||
return;
|
||||
}
|
||||
}
|
||||
return (<$fh>, <$fh>);
|
||||
}
|
||||
|
||||
# Link a certificate to its subject name hash value, each hash is of
|
||||
# the form <hash>.<n> where n is an integer. If the hash value already exists
|
||||
# then we need to up the value of n, unless its a duplicate in which
|
||||
# case we skip the link. We check for duplicates by comparing the
|
||||
# certificate fingerprints
|
||||
|
||||
sub link_hash_cert {
|
||||
link_hash($_[0], 'cert', '-subject_hash');
|
||||
link_hash($_[0], 'cert', '-subject_hash_old');
|
||||
}
|
||||
|
||||
# Same as above except for a CRL. CRL links are of the form <hash>.r<n>
|
||||
|
||||
sub link_hash_crl {
|
||||
link_hash($_[0], 'crl', '-hash');
|
||||
link_hash($_[0], 'crl', '-hash_old');
|
||||
}
|
||||
|
||||
sub link_hash {
|
||||
my ($fname, $type, $hash_name) = @_;
|
||||
my $is_cert = $type eq 'cert' or $type eq 'cert_old';
|
||||
|
||||
my ($hash, $fprint) = compute_hash($openssl,
|
||||
$is_cert ? "x509" : "crl",
|
||||
$hash_name,
|
||||
"-fingerprint", "-noout",
|
||||
"-in", $fname);
|
||||
chomp $hash;
|
||||
chomp $fprint;
|
||||
return if !$hash;
|
||||
$fprint =~ s/^.*=//;
|
||||
$fprint =~ tr/://d;
|
||||
my $suffix = 0;
|
||||
# Search for an unused hash filename
|
||||
my $crlmark = $is_cert ? "" : "r";
|
||||
while(exists $hashlist{"$hash.$crlmark$suffix"}) {
|
||||
# Hash matches: if fingerprint matches its a duplicate cert
|
||||
if ($hashlist{"$hash.$crlmark$suffix"} eq $fprint) {
|
||||
my $what = $is_cert ? 'certificate' : 'CRL';
|
||||
print STDERR "WARNING: Skipping duplicate $what $fname\n";
|
||||
return;
|
||||
}
|
||||
$suffix++;
|
||||
}
|
||||
$hash .= ".$crlmark$suffix";
|
||||
if ($symlink_exists) {
|
||||
print "link $fname -> $hash\n" if $verbose;
|
||||
symlink $fname, $hash || warn "Can't symlink, $!";
|
||||
} else {
|
||||
print "copy $fname -> $hash\n" if $verbose;
|
||||
copy_file($fname, $hash);
|
||||
}
|
||||
$hashlist{$hash} = $fprint;
|
||||
}
|
@ -1 +0,0 @@
|
||||
tic
|
Binary file not shown.
@ -1,107 +0,0 @@
|
||||
#!/bin/sh
|
||||
# Copyright (C) 1998-2020 Free Software Foundation, Inc.
|
||||
# This file is part of the GNU C Library.
|
||||
# Contributed by Ulrich Drepper <drepper@cygnus.com>, 1998.
|
||||
|
||||
# The GNU C Library is free software; you can redistribute it and/or
|
||||
# modify it under the terms of the GNU Lesser General Public
|
||||
# License as published by the Free Software Foundation; either
|
||||
# version 2.1 of the License, or (at your option) any later version.
|
||||
|
||||
# The GNU C Library is distributed in the hope that it will be useful,
|
||||
# but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
||||
# Lesser General Public License for more details.
|
||||
|
||||
# You should have received a copy of the GNU Lesser General Public
|
||||
# License along with the GNU C Library; if not, see
|
||||
# <https://www.gnu.org/licenses/>.
|
||||
|
||||
if test $# -eq 0; then
|
||||
echo "$0: missing program name" >&2
|
||||
echo "Try \`$0 --help' for more information." >&2
|
||||
exit 1
|
||||
fi
|
||||
|
||||
prog="$1"
|
||||
shift
|
||||
|
||||
if test $# -eq 0; then
|
||||
case "$prog" in
|
||||
--h | --he | --hel | --help)
|
||||
echo 'Usage: catchsegv PROGRAM ARGS...'
|
||||
echo ' --help print this help, then exit'
|
||||
echo ' --version print version number, then exit'
|
||||
echo 'For bug reporting instructions, please see:'
|
||||
cat <<\EOF
|
||||
<http://www.debian.org/Bugs/>.
|
||||
EOF
|
||||
exit 0
|
||||
;;
|
||||
--v | --ve | --ver | --vers | --versi | --versio | --version)
|
||||
echo 'catchsegv (Debian GLIBC 2.31-13+deb11u7) 2.31'
|
||||
echo 'Copyright (C) 2020 Free Software Foundation, Inc.
|
||||
This is free software; see the source for copying conditions. There is NO
|
||||
warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
||||
Written by Ulrich Drepper.'
|
||||
exit 0
|
||||
;;
|
||||
*)
|
||||
;;
|
||||
esac
|
||||
fi
|
||||
|
||||
segv_output=`mktemp ${TMPDIR:-/tmp}/segv_output.XXXXXX` || exit
|
||||
|
||||
# Redirect stderr to avoid termination message from shell.
|
||||
(exec 3>&2 2>/dev/null
|
||||
LD_PRELOAD=${LD_PRELOAD:+${LD_PRELOAD}:}/lib/x86_64-linux-gnu/libSegFault.so \
|
||||
SEGFAULT_USE_ALTSTACK=1 \
|
||||
SEGFAULT_OUTPUT_NAME=$segv_output \
|
||||
"$prog" ${1+"$@"} 2>&3 3>&-)
|
||||
exval=$?
|
||||
|
||||
# Check for output. Even if the program terminated correctly it might
|
||||
# be that a minor process (clone) failed. Therefore we do not check the
|
||||
# exit code.
|
||||
if test -s "$segv_output"; then
|
||||
# The program caught a signal. The output is in the file with the
|
||||
# name we have in SEGFAULT_OUTPUT_NAME. In the output the names of
|
||||
# functions in shared objects are available, but names in the static
|
||||
# part of the program are not. We use addr2line to get this information.
|
||||
case $prog in
|
||||
*/*) ;;
|
||||
*)
|
||||
old_IFS=$IFS
|
||||
IFS=:
|
||||
for p in $PATH; do
|
||||
test -n "$p" || p=.
|
||||
if test -f "$p/$prog"; then
|
||||
prog=$p/$prog
|
||||
break
|
||||
fi
|
||||
done
|
||||
IFS=$old_IFS
|
||||
;;
|
||||
esac
|
||||
sed '/Backtrace/q' "$segv_output"
|
||||
sed '1,/Backtrace/d' "$segv_output" |
|
||||
(while read line; do
|
||||
line=`echo $line | sed "s@^$prog\\(\\[.*\\)@\1@"`
|
||||
case "$line" in
|
||||
\[*) addr=`echo "$line" | sed 's/^\[\(.*\)\]$/\1/'`
|
||||
complete=`addr2line -f -e "$prog" $addr 2>/dev/null`
|
||||
if test $? -eq 0; then
|
||||
echo "`echo "$complete"|sed 'N;s/\(.*\)\n\(.*\)/\2(\1)/;'`$line"
|
||||
else
|
||||
echo "$line"
|
||||
fi
|
||||
;;
|
||||
*) echo "$line"
|
||||
;;
|
||||
esac
|
||||
done)
|
||||
fi
|
||||
rm -f "$segv_output"
|
||||
|
||||
exit $exval
|
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
@ -1 +0,0 @@
|
||||
hostname
|
@ -1 +0,0 @@
|
||||
hostname
|
Binary file not shown.
Binary file not shown.
@ -1,2 +0,0 @@
|
||||
#!/bin/sh
|
||||
exec grep -E "$@"
|
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
@ -1,2 +0,0 @@
|
||||
#!/bin/sh
|
||||
exec grep -F "$@"
|
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
@ -1,353 +0,0 @@
|
||||
#!/usr/bin/perl
|
||||
|
||||
# gdialog -> zenity conversion wrapper
|
||||
#
|
||||
# by Mike Newman <mikegtn@gnome.org>
|
||||
#
|
||||
# This is all, of course, horrible - but it should translate
|
||||
# most commond gdialog types to zenity equivalents. It will mostly drop
|
||||
# the pointless and unused (even by gdialog!) size arguments
|
||||
# but hopefully will translate all the others.
|
||||
#
|
||||
# For testing purposes, I've used a couple of the nautilus scripts
|
||||
# available at http://g-scripts.sourceforge.net - what is sometimes
|
||||
# unclear is what is a gdialog/zenity translation problem, and what is
|
||||
# a problem with the original script
|
||||
|
||||
my @command = ("zenity"); # the command line we build up to execute
|
||||
my $element = ""; # current bit of command line
|
||||
my $argn = 0; # counter for walking args
|
||||
my $args = $#ARGV + 1; # total number of command line arguments
|
||||
my $separator = 0; # set if --separate-output is in use
|
||||
|
||||
|
||||
# Additon by: Kevin C. Krinke (kck) <kckrinke@opendoorsoftware.com>
|
||||
#
|
||||
# gdialog itself supports both the X-Windows interface as well as a console
|
||||
# interface. Here's a fix to use regular dialog when appropriate.
|
||||
# This should probably be a more advanced test of some sort, but I don't know
|
||||
# of any other easy way of detecting and X-Windows environment. If someone does
|
||||
# know better, please let me know. So for now this works: "no DISPLAY; no X".
|
||||
|
||||
unless (defined $ENV{'DISPLAY'} && length($ENV{'DISPLAY'})) {
|
||||
|
||||
# reset the command string
|
||||
|
||||
@command = ();
|
||||
|
||||
# examine all the available/default paths
|
||||
|
||||
my $PATHS = ($ENV{'PATH'}||'/bin:/usr/bin:/usr/local/bin:/opt/bin');
|
||||
|
||||
BIN: foreach my $PATH (split(/\:/,$PATHS)) {
|
||||
|
||||
if (-x $PATH."/gdialog.real") {
|
||||
|
||||
# Some GNU/Linux distributions divert binaries when
|
||||
# other packages are installed. If this exists, chances
|
||||
# are it's the real gdialog and not the Zenity wrapper.
|
||||
# gdialog has full support for the Console medium and
|
||||
# as such is the preference over using the "regular"
|
||||
# dialog interface.
|
||||
|
||||
@command = ($PATH."/gdialog.real");
|
||||
last BIN;
|
||||
|
||||
} elsif (-x $PATH."/dialog") {
|
||||
|
||||
# change the command and skip ahead!
|
||||
|
||||
@command = ($PATH."/dialog");
|
||||
last BIN;
|
||||
|
||||
}
|
||||
|
||||
|
||||
}
|
||||
|
||||
unless (@command) {
|
||||
|
||||
# we didn't find the dialog binary, exit(254) with a message
|
||||
# to STDERR.
|
||||
|
||||
print STDERR "missing DISPLAY and a console dialog could".
|
||||
" not be found.\n";
|
||||
|
||||
# exit code 254 is used because 255, 1, 2, 3 are used by Zenity
|
||||
# and cDialog. This error, is a very _bad_ error so it's semi-
|
||||
# non-standard at 254.
|
||||
|
||||
exit(254);
|
||||
|
||||
}
|
||||
|
||||
# all is well if we've made it this far
|
||||
|
||||
# so join the arguments double-quoting things so that proper shell
|
||||
# notation is saved.
|
||||
|
||||
push @command, @ARGV;
|
||||
|
||||
# and fork the process
|
||||
|
||||
exec(@command);
|
||||
|
||||
}
|
||||
|
||||
# Got DISPLAY, has X continue as normal...
|
||||
# End Addtition by: KCK
|
||||
|
||||
# this just loads the current arg into $element
|
||||
|
||||
sub get_arg () {
|
||||
$element = $ARGV[$argn];
|
||||
}
|
||||
|
||||
# walk the command line
|
||||
|
||||
ARG: while ($argn < $args) {
|
||||
|
||||
get_arg;
|
||||
|
||||
# Informational stuff
|
||||
|
||||
if ($element eq "--help" || $element eq "--about") {
|
||||
print ( "gdialog is a compatibility wrapper around zenity, " .
|
||||
"provided to hopefully\nallow older scripts to run. " .
|
||||
"If you are reading this message, you should\n" .
|
||||
"probably be using zenity directly\n\n" .
|
||||
"type: 'zenity --help' or 'man zenity' for more information\n");
|
||||
exit (1);
|
||||
}
|
||||
|
||||
# Section 1 : Args which gdialog expects BEFORE box options
|
||||
# --clear, --backtitle have no obvious effect - ignored
|
||||
|
||||
if ($element eq "--title") {
|
||||
|
||||
# --title argument is almost analogous in gdialog and
|
||||
# zenity - so pass it almost entirely as is
|
||||
|
||||
$argn++;
|
||||
get_arg;
|
||||
push @command, "--title=$element";
|
||||
|
||||
# keep processing args
|
||||
$argn++;
|
||||
next ARG;
|
||||
}
|
||||
|
||||
if ($element eq "--separate-output") {
|
||||
|
||||
# set the flag to pring list output line by line
|
||||
$separator = 1;
|
||||
|
||||
# keep processing args
|
||||
$argn++;
|
||||
next ARG;
|
||||
}
|
||||
|
||||
# Section 2 : Box Options and subsequent args
|
||||
|
||||
if ($element eq "--msgbox" || $element eq "--infobox") {
|
||||
|
||||
# This bit is common to almost all of the dialogs
|
||||
# the arg following the dialog type in gdialog is usually
|
||||
# equivalent to zenity's --text arg.
|
||||
|
||||
$argn++;
|
||||
get_arg;
|
||||
push @command, "--info", "--text=$element";
|
||||
|
||||
# this also happens a lot - gdialog accepted size args
|
||||
# for dialog compatability - which it pretty much ignored
|
||||
# and we will do the same
|
||||
|
||||
$argn+=2;
|
||||
last ARG;
|
||||
}
|
||||
|
||||
if ($element eq "--yesno") {
|
||||
|
||||
# this will silently ignore the gdialog option to set
|
||||
# the default button in question dialogs - which is
|
||||
# highly hig-norant anyway!
|
||||
|
||||
$argn++;
|
||||
get_arg;
|
||||
push @command, "--question", "--text=$element";
|
||||
last ARG;
|
||||
}
|
||||
|
||||
if ($element eq "--inputbox") {
|
||||
$argn++;
|
||||
get_arg;
|
||||
push @command, "--entry", "--text=$element";
|
||||
|
||||
# ignore size elements and maybe there is some
|
||||
# default text to initialize the entry with?
|
||||
|
||||
$argn+=3;
|
||||
get_arg;
|
||||
push @command, "--entry-text=$element";
|
||||
last ARG;
|
||||
}
|
||||
|
||||
if ($element eq "--textbox") {
|
||||
push @command, "--text-info";
|
||||
|
||||
# the arg immediately following the dialog type in
|
||||
# gdialog is the filename, so pass this to zenity
|
||||
|
||||
$argn++;
|
||||
get_arg;
|
||||
push @command, "--filename=$element";
|
||||
|
||||
# width and height matter for this one, so get them
|
||||
# and apply the same multipliers as used in gdialog
|
||||
|
||||
$argn++;
|
||||
get_arg;
|
||||
$element = $element * 7;
|
||||
push @command, "--height=$element";
|
||||
$argn++;
|
||||
get_arg;
|
||||
$element = $element * 8;
|
||||
push @command, "--width=$element";
|
||||
last ARG;
|
||||
}
|
||||
|
||||
if ($element eq "--checklist" || $element eq "--radiolist") {
|
||||
$list=$element;
|
||||
$argn++;
|
||||
get_arg;
|
||||
|
||||
# Conveniently, zenity and gdialog use the same names
|
||||
# for list types, so pass this to zenity intact along with
|
||||
# an untitled column for the check or radio buttons
|
||||
# and the 'text' arg as a second column header
|
||||
|
||||
push @command, "--list", $list, "--column=''", "--column=''", "--column", $element;
|
||||
|
||||
# should output be line by line?
|
||||
if ($separator) {
|
||||
push @command, "--separator=\n";
|
||||
}
|
||||
|
||||
# Skip to the first 'item' arg of the list content
|
||||
# bypassing height, width and list-height
|
||||
# from here args run [tag] [item] [status] ...
|
||||
|
||||
$argn += 4;
|
||||
|
||||
# Loop over the remainder of the commandline
|
||||
# discarding the 'status' args of each item
|
||||
# and using the 'item' for display in our second column
|
||||
# also pass a fake NULL argument since zenity can't set
|
||||
# the status of a row like gdialog can
|
||||
|
||||
while ($argn < $args) {
|
||||
get_arg;
|
||||
push @command, "NULL", $element;
|
||||
$argn += 1;
|
||||
get_arg;
|
||||
push @command, $element;
|
||||
$argn += 2;
|
||||
}
|
||||
last ARG;
|
||||
}
|
||||
|
||||
if ($element eq "--menu") {
|
||||
$list=$element;
|
||||
$argn++;
|
||||
get_arg;
|
||||
|
||||
# a gdialog --menu is just a two column zenity --list
|
||||
# Leave the first column blank (not provided)
|
||||
# Use the 'text' arg as a second column header
|
||||
# FIXME: or should it be the dialog text, or both?
|
||||
|
||||
push @command, "--list", "--column", "", "--column", $element;
|
||||
|
||||
# Skip to the first 'item' arg of the list content
|
||||
# after using height, width and bypassing list-height
|
||||
# from here args run [tag] [item] ...
|
||||
|
||||
$argn += 1;
|
||||
|
||||
get_arg;
|
||||
# Height and width in characters to be displayed, so adjust
|
||||
# cdialog uses 6 height for non-list, zenity uses ~24 pixels
|
||||
# per list entry (default font), and 103 pixels for non-list
|
||||
# This appears to be almost exact
|
||||
$element = $element*24 - 35;
|
||||
push @command, "--height", $element;
|
||||
|
||||
$argn += 1;
|
||||
get_arg;
|
||||
# cdialog uses 6 width for non-list, zenity uses ~7 pixels
|
||||
# per character (default font), and 22 pixels for non-list
|
||||
# This is not exact, but close enough
|
||||
$element = $element*7 - 20;
|
||||
push @command, "--width", $element;
|
||||
|
||||
$argn += 2;
|
||||
|
||||
# Loop over the remainder of the commandline
|
||||
# keeping 'tag' args of each item (required to return)
|
||||
# and using the 'item' for display in our second column
|
||||
|
||||
while ($argn < $args) {
|
||||
get_arg;
|
||||
push @command, $element;
|
||||
$argn += 1;
|
||||
}
|
||||
last ARG;
|
||||
}
|
||||
|
||||
if ($element eq "--gauge") {
|
||||
$argn++;
|
||||
get_arg;
|
||||
push @command, "--progress", "--text=$element";
|
||||
|
||||
# discard the size args as usually, and see if
|
||||
# a percentage value was supplied to initialize the
|
||||
# dialog
|
||||
|
||||
$argn += 3;
|
||||
get_arg;
|
||||
if ($element) {
|
||||
push @command, "--percentage=$element";
|
||||
}
|
||||
last ARG;
|
||||
}
|
||||
|
||||
$argn++;
|
||||
}
|
||||
|
||||
# save STDOUT and STDERR
|
||||
open(ORG_STDOUT, ">&STDOUT");
|
||||
open(ORG_STDERR, ">&STDERR");
|
||||
|
||||
# redirect STDERR to /dev/null (GTK messages ie:
|
||||
# (zenity:637): Gtk-WARNING **: Unable to locate theme engine in module_path: "mist",)
|
||||
open(STDERR, ">/dev/null");
|
||||
|
||||
# redirect STDOUT to STDERR (gdialog direct output to STDERR by default)
|
||||
open(STDOUT, ">&ORG_STDERR");
|
||||
|
||||
# execute the constructed zenity command line
|
||||
|
||||
# perl doc: The return value of system() is the exit status of the
|
||||
#program as returned by the wait() call. To get the actual exit value
|
||||
# divide by 256.
|
||||
|
||||
my $return = system(@command)/256;
|
||||
|
||||
# restore STDOUT and STDERR
|
||||
open(STDOUT, ">&ORG_STDOUT");
|
||||
open(STDERR, ">&ORG_STDERR");
|
||||
close(ORG_STDOUT);
|
||||
close(ORG_STDERR);
|
||||
|
||||
exit $return;
|
@ -1 +0,0 @@
|
||||
/run/host/usr/bin/getconf
|
@ -1 +0,0 @@
|
||||
/run/host/usr/bin/getent
|
Binary file not shown.
Binary file not shown.
Binary file not shown.
@ -1,57 +0,0 @@
|
||||
#!/bin/sh
|
||||
# Uncompress files. This is the inverse of gzip.
|
||||
|
||||
# Copyright (C) 2007, 2010-2018 Free Software Foundation, Inc.
|
||||
|
||||
# This program is free software; you can redistribute it and/or modify
|
||||
# it under the terms of the GNU General Public License as published by
|
||||
# the Free Software Foundation; either version 3 of the License, or
|
||||
# (at your option) any later version.
|
||||
|
||||
# This program is distributed in the hope that it will be useful,
|
||||
# but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
# GNU General Public License for more details.
|
||||
|
||||
# You should have received a copy of the GNU General Public License along
|
||||
# with this program; if not, write to the Free Software Foundation, Inc.,
|
||||
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
|
||||
|
||||
version="gunzip (gzip) 1.10
|
||||
Copyright (C) 2007, 2011-2018 Free Software Foundation, Inc.
|
||||
This is free software. You may redistribute copies of it under the terms of
|
||||
the GNU General Public License <https://www.gnu.org/licenses/gpl.html>.
|
||||
There is NO WARRANTY, to the extent permitted by law.
|
||||
|
||||
Written by Paul Eggert."
|
||||
|
||||
usage="Usage: $0 [OPTION]... [FILE]...
|
||||
Uncompress FILEs (by default, in-place).
|
||||
|
||||
Mandatory arguments to long options are mandatory for short options too.
|
||||
|
||||
-c, --stdout write on standard output, keep original files unchanged
|
||||
-f, --force force overwrite of output file and compress links
|
||||
-k, --keep keep (don't delete) input files
|
||||
-l, --list list compressed file contents
|
||||
-n, --no-name do not save or restore the original name and timestamp
|
||||
-N, --name save or restore the original name and timestamp
|
||||
-q, --quiet suppress all warnings
|
||||
-r, --recursive operate recursively on directories
|
||||
-S, --suffix=SUF use suffix SUF on compressed files
|
||||
--synchronous synchronous output (safer if system crashes, but slower)
|
||||
-t, --test test compressed file integrity
|
||||
-v, --verbose verbose mode
|
||||
--help display this help and exit
|
||||
--version display version information and exit
|
||||
|
||||
With no FILE, or when FILE is -, read standard input.
|
||||
|
||||
Report bugs to <bug-gzip@gnu.org>."
|
||||
|
||||
case $1 in
|
||||
--help) printf '%s\n' "$usage" || exit 1; exit;;
|
||||
--version) printf '%s\n' "$version" || exit 1; exit;;
|
||||
esac
|
||||
|
||||
exec gzip -d "$@"
|
@ -1,241 +0,0 @@
|
||||
#!/bin/sh
|
||||
# gzexe: compressor for Unix executables.
|
||||
# Use this only for binaries that you do not use frequently.
|
||||
#
|
||||
# The compressed version is a shell script which decompresses itself after
|
||||
# skipping $skip lines of shell commands. We try invoking the compressed
|
||||
# executable with the original name (for programs looking at their name).
|
||||
# We also try to retain the original file permissions on the compressed file.
|
||||
# For safety reasons, gzexe will not create setuid or setgid shell scripts.
|
||||
|
||||
# WARNING: the first line of this file must be either : or #!/bin/sh
|
||||
# The : is required for some old versions of csh.
|
||||
# On Ultrix, /bin/sh is too buggy, change the first line to: #!/bin/sh5
|
||||
|
||||
|
||||
# Copyright (C) 1998, 2002, 2004, 2006-2007, 2010-2018 Free Software
|
||||
# Foundation, Inc.
|
||||
# Copyright (C) 1993 Jean-loup Gailly
|
||||
|
||||
# This program is free software; you can redistribute it and/or modify
|
||||
# it under the terms of the GNU General Public License as published by
|
||||
# the Free Software Foundation; either version 3 of the License, or
|
||||
# (at your option) any later version.
|
||||
|
||||
# This program is distributed in the hope that it will be useful,
|
||||
# but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
# GNU General Public License for more details.
|
||||
|
||||
# You should have received a copy of the GNU General Public License along
|
||||
# with this program; if not, write to the Free Software Foundation, Inc.,
|
||||
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
|
||||
|
||||
tab=' '
|
||||
nl='
|
||||
'
|
||||
IFS=" $tab$nl"
|
||||
|
||||
version='gzexe (gzip) 1.10
|
||||
Copyright (C) 2007, 2011-2018 Free Software Foundation, Inc.
|
||||
This is free software. You may redistribute copies of it under the terms of
|
||||
the GNU General Public License <https://www.gnu.org/licenses/gpl.html>.
|
||||
There is NO WARRANTY, to the extent permitted by law.
|
||||
|
||||
Written by Jean-loup Gailly.'
|
||||
|
||||
usage="Usage: $0 [OPTION] FILE...
|
||||
Replace each executable FILE with a compressed version of itself.
|
||||
Make a backup FILE~ of the old version of FILE.
|
||||
|
||||
-d Decompress each FILE instead of compressing it.
|
||||
--help display this help and exit
|
||||
--version output version information and exit
|
||||
|
||||
Report bugs to <bug-gzip@gnu.org>."
|
||||
|
||||
decomp=0
|
||||
res=0
|
||||
while :; do
|
||||
case $1 in
|
||||
-d) decomp=1; shift;;
|
||||
--h*) printf '%s\n' "$usage" || exit 1; exit;;
|
||||
--v*) printf '%s\n' "$version" || exit 1; exit;;
|
||||
--) shift; break;;
|
||||
*) break;;
|
||||
esac
|
||||
done
|
||||
|
||||
if test $# -eq 0; then
|
||||
printf >&2 '%s\n' "$0: missing operand
|
||||
Try \`$0 --help' for more information."
|
||||
exit 1
|
||||
fi
|
||||
|
||||
tmp=
|
||||
trap 'res=$?
|
||||
test -n "$tmp" && rm -f "$tmp"
|
||||
(exit $res); exit $res
|
||||
' 0 1 2 3 5 10 13 15
|
||||
|
||||
mktemp_status=
|
||||
|
||||
for i do
|
||||
case $i in
|
||||
-*) file=./$i;;
|
||||
*) file=$i;;
|
||||
esac
|
||||
if test ! -f "$file" || test ! -r "$file"; then
|
||||
res=$?
|
||||
printf >&2 '%s\n' "$0: $i is not a readable regular file"
|
||||
continue
|
||||
fi
|
||||
if test $decomp -eq 0; then
|
||||
case `LC_ALL=C sed -n -e 1d -e '/^skip=[0-9][0-9]*$/p' -e 2q "$file"` in
|
||||
skip=[0-9] | skip=[0-9][0-9] | skip=[0-9][0-9][0-9])
|
||||
printf >&2 '%s\n' "$0: $i is already gzexe'd"
|
||||
continue;;
|
||||
esac
|
||||
fi
|
||||
if test -u "$file"; then
|
||||
printf >&2 '%s\n' "$0: $i has setuid permission, unchanged"
|
||||
continue
|
||||
fi
|
||||
if test -g "$file"; then
|
||||
printf >&2 '%s\n' "$0: $i has setgid permission, unchanged"
|
||||
continue
|
||||
fi
|
||||
case /$file in
|
||||
*/basename | */bash | */cat | */chmod | */cp | \
|
||||
*/dirname | */expr | */gzip | \
|
||||
*/ln | */mkdir | */mktemp | */mv | */printf | */rm | \
|
||||
*/sed | */sh | */sleep | */test | */tail)
|
||||
printf >&2 '%s\n' "$0: $i might depend on itself"; continue;;
|
||||
esac
|
||||
|
||||
dir=`dirname "$file"` || dir=$TMPDIR
|
||||
test -d "$dir" && test -w "$dir" && test -x "$dir" || dir=/tmp
|
||||
test -n "$tmp" && rm -f "$tmp"
|
||||
if test -z "$mktemp_status"; then
|
||||
type mktemp >/dev/null 2>&1
|
||||
mktemp_status=$?
|
||||
fi
|
||||
case $dir in
|
||||
*/) ;;
|
||||
*) dir=$dir/;;
|
||||
esac
|
||||
if test $mktemp_status -eq 0; then
|
||||
tmp=`mktemp "${dir}gzexeXXXXXXXXX"`
|
||||
else
|
||||
tmp=${dir}gzexe$$
|
||||
fi && { cp -p "$file" "$tmp" 2>/dev/null || cp "$file" "$tmp"; } || {
|
||||
res=$?
|
||||
printf >&2 '%s\n' "$0: cannot copy $file"
|
||||
continue
|
||||
}
|
||||
if test -w "$tmp"; then
|
||||
writable=1
|
||||
else
|
||||
writable=0
|
||||
chmod u+w "$tmp" || {
|
||||
res=$?
|
||||
printf >&2 '%s\n' "$0: cannot chmod $tmp"
|
||||
continue
|
||||
}
|
||||
fi
|
||||
if test $decomp -eq 0; then
|
||||
(cat <<'EOF' &&
|
||||
#!/bin/sh
|
||||
skip=49
|
||||
|
||||
tab=' '
|
||||
nl='
|
||||
'
|
||||
IFS=" $tab$nl"
|
||||
|
||||
umask=`umask`
|
||||
umask 77
|
||||
|
||||
gztmpdir=
|
||||
trap 'res=$?
|
||||
test -n "$gztmpdir" && rm -fr "$gztmpdir"
|
||||
(exit $res); exit $res
|
||||
' 0 1 2 3 5 10 13 15
|
||||
|
||||
case $TMPDIR in
|
||||
/ | /*/) ;;
|
||||
/*) TMPDIR=$TMPDIR/;;
|
||||
*) TMPDIR=/tmp/;;
|
||||
esac
|
||||
if type mktemp >/dev/null 2>&1; then
|
||||
gztmpdir=`mktemp -d "${TMPDIR}gztmpXXXXXXXXX"`
|
||||
else
|
||||
gztmpdir=${TMPDIR}gztmp$$; mkdir $gztmpdir
|
||||
fi || { (exit 127); exit 127; }
|
||||
|
||||
gztmp=$gztmpdir/$0
|
||||
case $0 in
|
||||
-* | */*'
|
||||
') mkdir -p "$gztmp" && rm -r "$gztmp";;
|
||||
*/*) gztmp=$gztmpdir/`basename "$0"`;;
|
||||
esac || { (exit 127); exit 127; }
|
||||
|
||||
case `printf 'X\n' | tail -n +1 2>/dev/null` in
|
||||
X) tail_n=-n;;
|
||||
*) tail_n=;;
|
||||
esac
|
||||
if tail $tail_n +$skip <"$0" | gzip -cd > "$gztmp"; then
|
||||
umask $umask
|
||||
chmod 700 "$gztmp"
|
||||
(sleep 5; rm -fr "$gztmpdir") 2>/dev/null &
|
||||
"$gztmp" ${1+"$@"}; res=$?
|
||||
else
|
||||
printf >&2 '%s\n' "Cannot decompress $0"
|
||||
(exit 127); res=127
|
||||
fi; exit $res
|
||||
EOF
|
||||
gzip -cv9 "$file") > "$tmp" || {
|
||||
res=$?
|
||||
printf >&2 '%s\n' "$0: compression not possible for $i, file unchanged."
|
||||
continue
|
||||
}
|
||||
|
||||
else
|
||||
# decompression
|
||||
skip=44
|
||||
skip_line=`LC_ALL=C sed -e 1d -e 2q "$file"`
|
||||
case $skip_line in
|
||||
skip=[0-9] | skip=[0-9][0-9] | skip=[0-9][0-9][0-9])
|
||||
eval "$skip_line";;
|
||||
esac
|
||||
case `printf 'X\n' | tail -n +1 2>/dev/null` in
|
||||
X) tail_n=-n;;
|
||||
*) tail_n=;;
|
||||
esac
|
||||
tail $tail_n +$skip "$file" | gzip -cd > "$tmp" || {
|
||||
res=$?
|
||||
printf >&2 '%s\n' "$0: $i probably not in gzexe format, file unchanged."
|
||||
continue
|
||||
}
|
||||
fi
|
||||
test $writable -eq 1 || chmod u-w "$tmp" || {
|
||||
res=$?
|
||||
printf >&2 '%s\n' "$0: $tmp: cannot chmod"
|
||||
continue
|
||||
}
|
||||
ln -f "$file" "$file~" 2>/dev/null || {
|
||||
# Hard links may not work. Fall back on rm+cp so that $file always exists.
|
||||
rm -f "$file~" && cp -p "$file" "$file~"
|
||||
} || {
|
||||
res=$?
|
||||
printf >&2 '%s\n' "$0: cannot backup $i as $i~"
|
||||
continue
|
||||
}
|
||||
mv -f "$tmp" "$file" || {
|
||||
res=$?
|
||||
printf >&2 '%s\n' "$0: cannot rename $tmp to $i"
|
||||
continue
|
||||
}
|
||||
tmp=
|
||||
done
|
||||
(exit $res); exit $res
|
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
@ -1 +0,0 @@
|
||||
setarch
|
@ -1 +0,0 @@
|
||||
/run/host/usr/bin/iconv
|
Binary file not shown.
Binary file not shown.
@ -1 +0,0 @@
|
||||
tic
|
Binary file not shown.
Binary file not shown.
Some files were not shown because too many files have changed in this diff Show More
Loading…
x
Reference in New Issue
Block a user