This file is indexed.

/usr/share/votca/scripts/inverse/table_functional.sh is in votca-csg-scripts 1.3.0-3.

This file is owned by root:root, with mode 0o755.

The actual contents of the file can be viewed below.

  1
  2
  3
  4
  5
  6
  7
  8
  9
 10
 11
 12
 13
 14
 15
 16
 17
 18
 19
 20
 21
 22
 23
 24
 25
 26
 27
 28
 29
 30
 31
 32
 33
 34
 35
 36
 37
 38
 39
 40
 41
 42
 43
 44
 45
 46
 47
 48
 49
 50
 51
 52
 53
 54
 55
 56
 57
 58
 59
 60
 61
 62
 63
 64
 65
 66
 67
 68
 69
 70
 71
 72
 73
 74
 75
 76
 77
 78
 79
 80
 81
 82
 83
 84
 85
 86
 87
 88
 89
 90
 91
 92
 93
 94
 95
 96
 97
 98
 99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
#! /bin/bash
#
# Copyright 2009-2011 The VOTCA Development Team (http://www.votca.org)
#
# Licensed under the Apache License, Version 2.0 (the "License");
# you may not use this file except in compliance with the License.
# You may obtain a copy of the License at
#
#     http://www.apache.org/licenses/LICENSE-2.0
#
# Unless required by applicable law or agreed to in writing, software
# distributed under the License is distributed on an "AS IS" BASIS,
# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
# See the License for the specific language governing permissions and
# limitations under the License.
#

show_help () {
  cat <<EOF
${0##*/}, version %version%
This script creates a table with grid min:step:max for the a functional form

Usage: ${0##*/} [options] output

Allowed options:
-h, --help                    show this help
    --grid  XX:XX:XX          Output grid of the table
    --var X=Y                 Set a variable used in the function
    --fct FCT                 functional form of the table
    --headerfile XXX          Extra headerfile for the plot script
                              (useful for complicated functions)
    --gnuplot CMD             Gnuplot command to use
                              Default: $gnuplot
    --clean		      Clean intermediate files

Used external packages: gnuplot

Examples:
* ${0##*/} --grid 0:0.1:1 --fct x**2 CG-CG.tab.new
EOF
}

#default
output=""
vars=()
values=()
grid=()
fct=""
gnuplot=gnuplot
clean="no"
headers=( )

# parse arguments
shopt -s extglob
while [[ ${1} = -* ]]; do
  if [[ ${1} = --*=* ]]; then # case --xx=yy
    set -- "${1%%=*}" "${1#*=}" "${@:2}" # --xx=yy to --xx yy
  elif [[ ${1} = -[^-]?* ]]; then # case -xy split
    if [[ ${1} = -[o]* ]]; then #short opts with arguments
       set -- "${1:0:2}" "${1:2}" "${@:2}" # -xy to -x y
    else #short opts without arguments
       set -- "${1:0:2}" "-${1:2}" "${@:2}" # -xy to -x -y
    fi
 fi
 case $1 in
   -h | --help)
    show_help
    exit 0;;
   --fct)
    fct="$2"
    shift 2;;
   --headerfile)
    [[ -f $2 ]] || die "${0##*/}: Could not find headerfile '$2'"
    headers[${#headers[@]}]="$2"
    shift 2;;
   --grid)
    grid[0]="$2"
    [[ $grid =~ ^(.*):(.*):(.*)$ ]] || die "${0##*/}: Agrument after --grid should have the form XX:XX:XX"
    for i in 1 2 3; do
      [[ -z ${BASH_REMATCH[$i]} ]] && die "${0##*/}: part nr $i of XX:XX:XX was empty"
      is_num "${BASH_REMATCH[$i]}" || die "${0##*/}: part nr $i of XX:XX:XX should be a number"
      grid[$i]="${BASH_REMATCH[$i]}"
    done
    shift 2;;
   --clean)
    clean="yes"
    shift;;
   --var)
    [[ ${2//[^=]} = "=" ]] || die "${0##*/}: Agrument after --var should have the form XX=YY"
    [[ -n $vars ]] && vars+="\n$2" || vars="$2"
    shift 2;;
   --debug)
    set -x
    shift ;;
  *)
   die "Unknown option '$1'"
   exit 1;;
 esac
done

[[ -z $1 ]] && die "${0##*/}: Missing arguments"
output="$1"
shift

for i in grid fct; do
 [[ -z ${!i} ]] && die "${0##*/}: Missing arguments --$i"
done

len=$(csg_calc "${grid[3]}" - "${grid[1]}")
samples="$(csg_calc "$len" / "${grid[2]}")"
samples="$(to_int "$samples")"
((samples++))

[ -n "$(type -p $gnuplot)" ] || die "${0##*/}: gnuplot binary '$gnuplot' not found"

tmpfile="$(critical mktemp table.gp.XXX)"
tmpfile2="$(critical mktemp table.plot.XXX)"
get_table_comment | sed -e 's/^/#/' > "$tmpfile"
echo -e "#\n#Plot script:" >> "$tmpfile"
[[ -n $vars ]] && echo -e "$vars" >> "$tmpfile"
for i in "${headers[@]}"; do
  echo "load '$i'" >> "$tmpfile"
done
echo "set samples $samples" >> "$tmpfile"
echo "set table '$tmpfile2'" >> "$tmpfile"
echo "plot [${grid[1]}:${grid[3]}] $fct" >> "$tmpfile"
critical $gnuplot "$tmpfile"

critical sed -e 's/^#*/#/' "$tmpfile" > "$output"
echo -e "#\n# Gnuplot output:" >> "$output"
critical sed -e '/^[[:space:]]*$/d' "$tmpfile2" >> "$output"

if [[ $clean = "yes" ]]; then
  rm -f "$tmpfile" "$tmpfile2"
fi