This file is indexed.

/usr/sbin/clc-update-customized-images is in common-lisp-controller 7.10+nmu1.

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
#!/bin/sh
# Copyright (C) 2006 René van Bevern <rvb@progn.org>
# Licensed under the LLGPL, see debian/copyright file

library="$1"

HOME=/tmp/
LANG=C
LC_ALL=C
export HOME LANG LC_ALL

if [ -z "$library" ]; then
    cat <<EOF
usage: $(basename $0) system-name

checks if "system-name" is wished to be part of the default image of an
implementation as specified in /etc/common-lisp/images/implementation and
re-creates the implementation's image in that case.
EOF
    exit 1
fi

# It is not using "register-common-lisp-implementation" intentionally,
# since this should really only reinstall CLC and the function of
# "register-common-lisp-implementation" might change

for implementation in /etc/common-lisp/images/*; do
    impl_name=$(basename "$implementation")
    if [ -x /usr/lib/common-lisp/bin/"$impl_name".sh ] &&
      grep "$library" "$implementation" > /dev/null; then
	echo "Recreating image of \"$impl_name\" for \"$library\"..."
	sh /usr/lib/common-lisp/bin/"$impl_name".sh install-clc
    fi
done

exit 0