1
1
openmpi/contrib/header_replacement.sh
Rainer Keller dd9bfc9d63 - orte_show_help_replacement.sh script used in r20557
This commit was SVN r20558.

The following SVN revision numbers were found above:
  r20557 --> open-mpi/ompi@d81443cc5a
2009-02-14 02:31:04 +00:00

115 строки
5.1 KiB
Bash
Исполняемый файл

#!/bin/sh
#
# Copyright (c) 2004-2005 The Trustees of Indiana University and Indiana
# University Research and Technology
# Corporation. All rights reserved.
# Copyright (c) 2004-2005 The University of Tennessee and The University
# of Tennessee Research Foundation. All rights
# reserved.
# Copyright (c) 2004-2005 High Performance Computing Center Stuttgart,
# University of Stuttgart. All rights reserved.
# Copyright (c) 2004-2005 The Regents of the University of California.
# All rights reserved.
# Copyright (c) 2009 Oak Ridge National Labs. All rights reserved.
#
# orte_show_help_replacement.sh Script to detect occurences of
# #include "orte/util/show_help.h", where actually either
# 1. #include "opal/util/output.h"
# 2. #include "orte/mca/rml/rml_types.h"
# were required.
#
# Some grep/sed mojo may be of interest to others...
#
function add_header()
{
file=$1 # File to add header to
header=$2 # E.g. opal/util/output.h for #include "opal/util/output.h"
after_header_pattern=$3 # Add after occurences of pattern, e.g. opal/util
line=`grep -n "#include \"$after_header_pattern" $file | cut -f1 -d':' | head -n1`
if [ $# -gt 3 -a "x$line" = "x" ] ; then
after_header_pattern=$4 # If above pattern is not found, try more generic, e.g. opal/
line=`grep -n "#include \"$after_header_pattern" $file | cut -f1 -d':' | head -n1`
# If we have a final even more general pattern to search for...
if [ $# -eq 5 -a "x$line" = "x" ] ; then
after_header_pattern=$5 # If above pattern is not found, try even more generic, e.g. opal/
line=`grep -n "#include \"$after_header_pattern" $file | cut -f1 -d':' | head -n1`
fi
# If still not found, go for plain '#include "'
if [ "x$line" = "x" ] ; then
echo Can neither find pattern $3 nor pattern $4 in file $file -- will include after the first include
line=`grep -n "#include \"" $file | cut -f1 -d':' | head -n1`
if [ "x$line" = "x" ] ; then
echo REAL ERROR -- NO INCLUDES AT ALL. INCLUDE MANUALLY
return
fi
# check if this is a header wrapped in #ifdef HAVE_LALALA_H, if so, add after endif
next_line=$(($line + 1))
head -n $next_line $file | tail -n1 | grep -q \#endif \
&& sed -i -e "${next_line}s:#endif.*:\0\n\n#include \"$header\":" $file \
|| sed -i -e "${line}s:#include.*:\0\n#include \"$header\":" $file
return
fi
fi
# check if this is a header wrapped in #ifdef HAVE_LALALA_H, if so, add after endif
next_line=$(($line + 1))
head -n $next_line $file | tail -n1 | grep -q \#endif \
&& sed -i -e "${next_line}s:#endif.*:\0\n\n#include \"$header\":" $file \
|| sed -i -e "${line}s:#include \"$after_header_pattern.*:\0\n#include \"$header\":" $file
}
function del_header()
{
file=$1
header=`echo $2 | sed 's/\//\\\\\//g'`
line=`grep -n "#include \"$2" $file | cut -f1 -d':' | head -n1`
if [ "x$line" = "x" ] ; then
echo Can not find pattern $header file $file -- will not delete
return
fi
# Remove the header including any characters at end of the line MULTI_LINE COMMENTS...?
sed -i -e "/#include \"$header\".*/d" $file
}
SEARCH_HEADER=show_help.h
# Search for all source files with show_help.h in it.
for i in `find . -type f '(' -name '*.[cChysSfF]' -o -iname '*.cc' -o -name '*.cpp' -o -name '*.[fF]77' -o -name '*.[fF]90' ')' | sort | xargs grep -n $SEARCH_HEADER | cut -f1 -d':' | sort | uniq` ; do
# Now we do know that we have orte/util/show_help.h
found_orte_show_help_h=1
need_orte_show_help_h=0
found_opal_util_output_h=0
need_opal_util_output_h=0
found_orte_mca_rml_rml_types_h=0
need_orte_mca_rml_rml_types_h=0
grep -q orte_show_help $i && need_orte_show_help_h=1
grep -q opal\/util\/output.h $i && found_opal_util_output_h=1
grep -q opal_output $i && need_opal_util_output_h=1
grep -q orte\/mca\/rml\/rml_types.h $i && found_orte_mca_rml_rml_types_h=1
grep -q -E '(orte_rml_tag_t|ORTE_RML_)' $i && need_orte_mca_rml_rml_types_h=1
if [ $need_opal_util_output_h -eq 1 -a $found_opal_util_output_h -eq 0 ] ; then
echo -e $i \\t Found opal_output in file, but not include opal/util/output.h
add_header $i opal/util/output.h opal/util/ opal/class/ opal/
fi
if [ $need_orte_mca_rml_rml_types_h -eq 1 -a $found_orte_mca_rml_rml_types_h -eq 0 ] ; then
echo -e $i \\t Found orte_rml_tag_t or ORTE_RML_ in file, but no include orte/mca/rml/rml_types.h
add_header $i orte/mca/rml/rml_types.h orte/mca/rml/ orte/mca/ orte/
fi
if [ $need_orte_show_help_h -eq 0 ] ; then
echo -e $i \\t Found orte_rml_tag_t or ORTE_RML_ in file, but no include orte/mca/rml/rml_types.h
del_header $i orte/util/show_help.h
fi
done