Delete a few more scripts
Most of these don't seem to have been used any time recently so just delete.
This commit is contained in:
Laura Abbott
parent
692398cecf
commit
aa92e83bbb
@ -1,82 +0,0 @@
|
|||||||
#! /usr/bin/perl
|
|
||||||
|
|
||||||
my @args=@ARGV;
|
|
||||||
my @configoptions;
|
|
||||||
my @configvalues;
|
|
||||||
my @common;
|
|
||||||
my $configcounter = 0;
|
|
||||||
|
|
||||||
# first, read the 1st file
|
|
||||||
|
|
||||||
open (FILE,"$args[0]") || die "Could not open $args[0]";
|
|
||||||
while (<FILE>) {
|
|
||||||
my $str = $_;
|
|
||||||
if (/\# ([\w]+) is not set/) {
|
|
||||||
$configoptions[$configcounter] = $1;
|
|
||||||
$configvalues[$configcounter] = $str;
|
|
||||||
$common[$configcounter] = 1;
|
|
||||||
$configcounter ++;
|
|
||||||
} else {
|
|
||||||
if (/([\w]+)=/) {
|
|
||||||
$configoptions[$configcounter] = $1;
|
|
||||||
$configvalues[$configcounter] = $str;
|
|
||||||
$common[$configcounter] = 1;
|
|
||||||
$configcounter ++;
|
|
||||||
} else {
|
|
||||||
$configoptions[$configcounter] = "foobarbar";
|
|
||||||
$configvalues[$configcounter] = $str;
|
|
||||||
$common[$configcounter] = 1;
|
|
||||||
$configcounter ++;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
};
|
|
||||||
|
|
||||||
# now, read all configfiles and see of the options match the initial one.
|
|
||||||
# if not, mark it not common
|
|
||||||
my $cntr=1;
|
|
||||||
|
|
||||||
|
|
||||||
while ($cntr < @ARGV) {
|
|
||||||
open (FILE,$args[$cntr]) || die "Could not open $args[$cntr]";
|
|
||||||
while (<FILE>) {
|
|
||||||
my $nooutput;
|
|
||||||
my $counter;
|
|
||||||
my $configname;
|
|
||||||
|
|
||||||
if (/\# ([\w]+) is not set/) {
|
|
||||||
$configname = $1;
|
|
||||||
} else {
|
|
||||||
if (/([\w]+)=/) {
|
|
||||||
$configname = $1;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
$counter = 0;
|
|
||||||
$nooutput = 0;
|
|
||||||
while ($counter < $configcounter) {
|
|
||||||
if ("$configname" eq "$configoptions[$counter]") {
|
|
||||||
if ("$_" eq "$configvalues[$counter]") {
|
|
||||||
1;
|
|
||||||
} else {
|
|
||||||
$common[$counter] = 0;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
$counter++;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
$cntr++;
|
|
||||||
}
|
|
||||||
|
|
||||||
# now print the common values
|
|
||||||
my $counter = 0;
|
|
||||||
|
|
||||||
while ($counter < $configcounter) {
|
|
||||||
if ($common[$counter]!=0) {
|
|
||||||
print "$configvalues[$counter]";
|
|
||||||
}
|
|
||||||
$counter++;
|
|
||||||
}
|
|
||||||
|
|
||||||
1;
|
|
||||||
|
|
||||||
@ -1,76 +0,0 @@
|
|||||||
#! /usr/bin/perl
|
|
||||||
|
|
||||||
my @args=@ARGV;
|
|
||||||
my @configoptions;
|
|
||||||
my @configvalues;
|
|
||||||
my @alreadyprinted;
|
|
||||||
my $configcounter = 0;
|
|
||||||
|
|
||||||
# first, read the override file
|
|
||||||
|
|
||||||
open (FILE,"$args[0]") || die "Could not open $args[0]";
|
|
||||||
while (<FILE>) {
|
|
||||||
my $str = $_;
|
|
||||||
if (/\# ([\w]+) is not set/) {
|
|
||||||
$configoptions[$configcounter] = $1;
|
|
||||||
$configvalues[$configcounter] = $str;
|
|
||||||
$alreadprinted[$configcounter] = 0;
|
|
||||||
$configcounter ++;
|
|
||||||
} else {
|
|
||||||
if (/([\w]+)=/) {
|
|
||||||
$configoptions[$configcounter] = $1;
|
|
||||||
$configvalues[$configcounter] = $str;
|
|
||||||
$alreadprinted[$configcounter] = 0;
|
|
||||||
$configcounter ++;
|
|
||||||
} else {
|
|
||||||
$configoptions[$configcounter] = "$_";
|
|
||||||
$configvalues[$configcounter] = $str;
|
|
||||||
$alreadprinted[$configcounter] = 0;
|
|
||||||
$configcounter ++;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
};
|
|
||||||
|
|
||||||
# now, read and output the entire configfile, except for the overridden
|
|
||||||
# parts... for those the new value is printed.
|
|
||||||
# O(N^2) algorithm so if this is slow I need to look at it later
|
|
||||||
|
|
||||||
open (FILE2,"$args[1]") || die "Could not open $args[1]";
|
|
||||||
while (<FILE2>) {
|
|
||||||
my $nooutput;
|
|
||||||
my $counter;
|
|
||||||
my $configname="$_";
|
|
||||||
my $match;
|
|
||||||
|
|
||||||
if (/\# ([\w]+) is not set/) {
|
|
||||||
$configname = $1;
|
|
||||||
} else {
|
|
||||||
if (/([\w]+)=/) {
|
|
||||||
$configname = $1;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
$counter = 0;
|
|
||||||
$nooutput = 0;
|
|
||||||
$match = 0;
|
|
||||||
# print "C : $configname";
|
|
||||||
while ($counter < $configcounter) {
|
|
||||||
if ("$configname" eq "$configoptions[$counter]") {
|
|
||||||
if ( ("$_" eq "$configvalues[$counter]") || ("$configname" eq "") ) {
|
|
||||||
$match = 1;
|
|
||||||
} else {
|
|
||||||
$alreadyprinted[$configcounter] = 1;
|
|
||||||
print "$_";
|
|
||||||
$match = 1;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
$counter++;
|
|
||||||
}
|
|
||||||
if ($match == 0) {
|
|
||||||
print "$_";
|
|
||||||
}
|
|
||||||
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
1;
|
|
||||||
@ -1,226 +0,0 @@
|
|||||||
#!/bin/bash
|
|
||||||
|
|
||||||
FC=($(fedpkg verrel | awk -F. '{print $NF}'))
|
|
||||||
|
|
||||||
SRC=($(ls config-* 2>/dev/null))
|
|
||||||
|
|
||||||
TGT=($(ls kernel-*.$FC/linux-*.$2/configs/kernel-*-*.config \
|
|
||||||
kernel-*.$FC/linux-*.$2/configs/kernel-*-*-debug.config 2>/dev/null))
|
|
||||||
TGT1=(${TGT[*]#kernel-*.$FC/linux-*.$2/configs/kernel-*-})
|
|
||||||
|
|
||||||
ALL_OPTS="cdfimn"
|
|
||||||
|
|
||||||
if [ $# -lt 2 ] ; then
|
|
||||||
echo -e "Usage:\n $(basename $0) [-$ALL_OPTS] input target\n"
|
|
||||||
echo -e " Sort input config file into the same order as the target\n"
|
|
||||||
echo -e " -c: insert comments about non-matching/impossible items"
|
|
||||||
echo -e " -d: show raw unsorted output with extra debug text"
|
|
||||||
echo -e " -f: force output to match what is in the target config,"
|
|
||||||
echo -e " and/or remove impossible config items"
|
|
||||||
echo -e " -i: find impossible config items"
|
|
||||||
echo -e " -m: find changed config items"
|
|
||||||
echo -e " -n: do not sort output\n"
|
|
||||||
echo -e " input: source config file" ' [' "${SRC[*]#config-}" ']\n'
|
|
||||||
echo -e " target: output arch name" ' [' "${TGT1[*]%.config}" ']\n'
|
|
||||||
exit 1
|
|
||||||
fi
|
|
||||||
|
|
||||||
while getopts "$ALL_OPTS" OPTION ; do
|
|
||||||
case $OPTION in
|
|
||||||
c)
|
|
||||||
ADDCOMMENT=1 ;;
|
|
||||||
d)
|
|
||||||
DEBUG=1 ;;
|
|
||||||
f)
|
|
||||||
FORCE=1 ;;
|
|
||||||
i)
|
|
||||||
FIND_IMPOSS=1 ;;
|
|
||||||
m)
|
|
||||||
FIND_CHANGED=1 ;;
|
|
||||||
n)
|
|
||||||
NOSORT=1 ;;
|
|
||||||
\?)
|
|
||||||
exit 2 ;;
|
|
||||||
esac
|
|
||||||
done
|
|
||||||
|
|
||||||
if [ "$FORCE" -a "$ADDCOMMENT" ] ; then
|
|
||||||
echo "-f and -c options cannot be used together"
|
|
||||||
exit 2
|
|
||||||
fi
|
|
||||||
|
|
||||||
shift $((OPTIND-1))
|
|
||||||
|
|
||||||
TEMPFILES="xx00 xx01 xx98 xx99"
|
|
||||||
TEMPLEFT=
|
|
||||||
for FILE in $TEMPFILES ; do
|
|
||||||
[ -f "$FILE" ] && TEMPLEFT="Y"
|
|
||||||
done
|
|
||||||
if [ "$TEMPLEFT" ] ; then
|
|
||||||
echo "WARNING! Output files named xx?? already exist." >&2
|
|
||||||
read -p "Press <Enter> to erase files, or Ctrl-C to exit..."
|
|
||||||
echo >&2
|
|
||||||
fi
|
|
||||||
rm -f $TEMPFILES
|
|
||||||
|
|
||||||
SRCFILE=config-$1
|
|
||||||
[ ! -f $SRCFILE ] && echo "Input file" $SRCFILE "missing" && exit 2
|
|
||||||
|
|
||||||
TGTFILE=kernel-*.$FC/linux-*.$2/configs/kernel-*-$2.config
|
|
||||||
[ ! -f $TGTFILE ] && echo "No target file matching" $TGTFILE "exists" && exit 2
|
|
||||||
|
|
||||||
[ "$FIND_IMPOSS" ] && \
|
|
||||||
find kernel-*.$FC/*.$2 -name Kconfig\* -type f \
|
|
||||||
| xargs egrep -s -h '^[[:space:]]*(menu)?config[[:space:]]+' \
|
|
||||||
| sed -r 's/^[[:space:]]*(menu)?config[[:space:]]+/CONFIG_/' \
|
|
||||||
| sort | uniq >xx98
|
|
||||||
|
|
||||||
extract_optname() {
|
|
||||||
# extract the option name from $TEXT, setting $OPTNAME
|
|
||||||
OPTNAME=
|
|
||||||
if [ "${TEXT:0:7}" = "CONFIG_" ] ; then
|
|
||||||
OPTNAME=${TEXT%%=*}
|
|
||||||
elif [ "${TEXT:0:9}" = "# CONFIG_" ] ; then
|
|
||||||
OPTNAME=${TEXT%" is not set"}
|
|
||||||
OPTNAME=${OPTNAME#\# }
|
|
||||||
fi
|
|
||||||
}
|
|
||||||
|
|
||||||
print_saved_comments() {
|
|
||||||
if [ $IX -gt 0 ] ; then
|
|
||||||
[ "$DEBUG" ] && echo " ->" $IX "comments were saved"
|
|
||||||
(( IX-- ))
|
|
||||||
for IX in $(seq 0 $IX) ; do
|
|
||||||
echo "$LINE":"${SAVECOMMENT[$IX]}"
|
|
||||||
done
|
|
||||||
unset SAVECOMMENT
|
|
||||||
IX=0
|
|
||||||
fi
|
|
||||||
}
|
|
||||||
|
|
||||||
assign_line_number() {
|
|
||||||
# use input line numbers if not sorting
|
|
||||||
[ "$NOSORT" ] && LINE=$IN
|
|
||||||
# make sure it has a line number
|
|
||||||
[ -z "$LINE" ] && LINE=999999
|
|
||||||
}
|
|
||||||
|
|
||||||
IX=0
|
|
||||||
IN=0
|
|
||||||
declare -a SAVECOMMENT
|
|
||||||
|
|
||||||
cat ${SRCFILE} | {
|
|
||||||
while read TEXT ; do
|
|
||||||
|
|
||||||
LINE=
|
|
||||||
COMMENT=
|
|
||||||
|
|
||||||
# replace empty lines
|
|
||||||
[ -z "$TEXT" ] && TEXT='//'
|
|
||||||
|
|
||||||
if [ "${TEXT:0:7}" = "CONFIG_" -o "${TEXT:0:9}" = "# CONFIG_" ] ; then
|
|
||||||
|
|
||||||
LINE=$(grep -n "^$TEXT" $TGTFILE | head -1 | cut -f 1 -d ':')
|
|
||||||
if [ -z "$LINE" ] ; then
|
|
||||||
[ "$DEBUG" ] && echo "nofind ->" "$TEXT"
|
|
||||||
|
|
||||||
extract_optname
|
|
||||||
if [ "$OPTNAME" ] ; then
|
|
||||||
|
|
||||||
if [ "$FIND_CHANGED" ] ; then
|
|
||||||
for FINDTEXT in "^${OPTNAME}=" "^# ${OPTNAME} is not set" ; do
|
|
||||||
if [ -z "$LINE" ] ; then
|
|
||||||
[ "$DEBUG" ] && echo "looking for ->" "$FINDTEXT"
|
|
||||||
LINE=$(grep -n "$FINDTEXT" $TGTFILE | head -1 | cut -f 1 -d ':')
|
|
||||||
if [ "$LINE" ] ; then
|
|
||||||
CHANGED=$(grep "$FINDTEXT" $TGTFILE | head -1)
|
|
||||||
if [ "$FORCE" ] ; then
|
|
||||||
TEXT=$CHANGED
|
|
||||||
[ "$DEBUG" ] && echo 'forced ->' "$TEXT"
|
|
||||||
else
|
|
||||||
if [ "$ADDCOMMENT" ] ; then
|
|
||||||
if [ ${CHANGED:0:1} = '#' ] ; then
|
|
||||||
NEWOPT="not set"
|
|
||||||
else
|
|
||||||
NEWOPT=${CHANGED#$OPTNAME}
|
|
||||||
fi
|
|
||||||
COMMENT="# -- Next option changed to \"${NEWOPT}\" at target line $LINE --"
|
|
||||||
fi
|
|
||||||
fi
|
|
||||||
fi
|
|
||||||
fi
|
|
||||||
done
|
|
||||||
fi
|
|
||||||
|
|
||||||
if [ "$FIND_IMPOSS" -a -z "$LINE" -a -z "$COMMENT" ] ; then
|
|
||||||
POSSIBLE=$(grep -n "^$OPTNAME" xx98)
|
|
||||||
if [ -z "$POSSIBLE" ] ; then
|
|
||||||
if [ "$ADDCOMMENT" ] ; then
|
|
||||||
COMMENT="# -- Next option is impossible --"
|
|
||||||
elif [ "$FORCE" ] ; then
|
|
||||||
[ "$DEBUG" ] && echo 'impossible ->' "$TEXT"
|
|
||||||
TEXT=""
|
|
||||||
fi
|
|
||||||
fi
|
|
||||||
fi
|
|
||||||
|
|
||||||
fi
|
|
||||||
|
|
||||||
fi
|
|
||||||
|
|
||||||
else
|
|
||||||
# not a config variable
|
|
||||||
COMMENT="$TEXT"
|
|
||||||
TEXT=
|
|
||||||
fi
|
|
||||||
|
|
||||||
[ "$DEBUG" -a "$COMMENT" ] && echo "comment ->" "$LINE" "$COMMENT"
|
|
||||||
[ "$DEBUG" -a "$TEXT" ] && echo "text ->" "$LINE" "$TEXT"
|
|
||||||
|
|
||||||
if [ "$TEXT" ] ; then
|
|
||||||
|
|
||||||
assign_line_number
|
|
||||||
|
|
||||||
# print the saved comments first
|
|
||||||
print_saved_comments
|
|
||||||
# now print the latest comment and text
|
|
||||||
[ "$COMMENT" ] && echo "$LINE":"$COMMENT"
|
|
||||||
echo "$LINE":"$TEXT"
|
|
||||||
|
|
||||||
elif [ "$COMMENT" ] ; then
|
|
||||||
|
|
||||||
# no output yet, save the comment
|
|
||||||
SAVECOMMENT[$IX]="$COMMENT"
|
|
||||||
let IX++
|
|
||||||
[ "$DEBUG" ] && echo 'savecomment (#'${IX}')'
|
|
||||||
|
|
||||||
fi
|
|
||||||
|
|
||||||
let IN++
|
|
||||||
|
|
||||||
done
|
|
||||||
# flush the buffers
|
|
||||||
assign_line_number
|
|
||||||
print_saved_comments
|
|
||||||
[ "$DEBUG" ] && echo "$IN lines read from input"
|
|
||||||
} >xx99
|
|
||||||
|
|
||||||
if [ "$DEBUG" ] ; then
|
|
||||||
# just show the raw output with debug info, then exit
|
|
||||||
cat xx99
|
|
||||||
else
|
|
||||||
|
|
||||||
# split output into two files, for matched and unmatched items
|
|
||||||
cat xx99 | sort -s -t ":" -k 1g | csplit -k -s - /^999999/ 2>/dev/null
|
|
||||||
|
|
||||||
cat xx00 | cut -f 2- -d ':' | sed 's/^\/\/$//'
|
|
||||||
if [ -s xx01 ] ; then
|
|
||||||
echo
|
|
||||||
echo '# ------------ UNMATCHED OPTIONS ------------'
|
|
||||||
echo
|
|
||||||
cat xx01 | cut -f 2- -d ':' | sed 's/^\/\/$//'
|
|
||||||
fi
|
|
||||||
|
|
||||||
fi
|
|
||||||
|
|
||||||
rm -f $TEMPFILES
|
|
||||||
Loading…
Reference in New Issue
Block a user