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
|
#! /bin/sh
# postinst script for erlang-base
#
# see: dh_installdeb(1)
set -e
# summary of how this script can be called:
# * <postinst> configure <most-recently-configured-version>
# * <old-postinst> abort-upgrade <new-version>
# * <conflictor's-postinst> abort-remove in-favour <package> <new-version>
# * <postinst> abort-remove
# * <deconfigured's-postinst> abort-deconfigure in-favour <failed-install-package> <version> \
# removing <conflicting-package> <version>
# for details, see /usr/doc/packaging-manual/
#
# quoting from the policy:
# Any necessary prompting should almost always be confined to the
# post-installation script, and should be protected with a conditional
# so that unnecessary prompting doesn't happen if a package's
# installation fails and the <postinst> is called with abort-upgrade,
# abort-remove or abort-deconfigure.
case "$1" in
abort-upgrade|abort-remove|abort-deconfigure)
;;
configure)
# Create epmd user
adduser --quiet --system --group --no-create-home --home /var/run/epmd epmd
;;
*)
echo "postinst called with unknown argument \`$1'" >&2
exit 0
;;
esac
# dh_installdeb will replace this with shell code automatically
# generated by other debhelper scripts.
#DEBHELPER#
case "$1" in
configure)
if [ -z "$2" ] || dpkg --compare-versions "$2" ge-nl "1:10.b.10-3" ; then
echo -n "Searching for services which depend on erlang and should be started... "
if which systemctl >/dev/null && systemctl >/dev/null 2>&1 ; then
help="systemctl start <service>"
# native service files:
services1=$(systemctl list-unit-files '*.s*' | grep -P '(static|enabled)' | cut -f 1 -d ' ' | sed -e's:^:/lib/systemd/*/:')
# generated service files:
services2=$(systemctl list-unit-files '*.s*' | grep -P '(generated)' | cut -f 1 -d ' ' | sed -e's:^\(.*\)\..*:/etc/init.d/\1:')
# find the packages they belong
inits=$(dpkg -S $services1 $services2 2>/dev/null | sed -e's:/.*/::')
else
help="invoke-rc.d <service> start"
# find all init scripts and packages they belong
inits=$(dpkg -S '/etc/init.d/*' 2>/dev/null | sed -e's:/etc/init.d/::')
fi
# filter the list of the packages
packs=$(echo $inits | sed -e's/:[[:space:]]\+[^[:space:]]*//g' | sed -e's/ /\n/g' | sort -u)
# find packages, which depend on erlang
packs=$(dpkg -s $packs 2>/dev/null | \
egrep '^Package:|^Status:|^Depends' | \
awk '{if ($1 ~ /^Package:/) {package=$2;inst=0} else if ($0 ~ /^Status:.* installed$/) {inst=1} else if ((inst==1) && ($0 ~ /^Depends:.* erlang/)) {print package}}')
# construct services list from the packages
services=""
for p in $packs ; do
service=$(echo $inits | sed -e's/\([^:]\) /\1\n/g' | awk "/^$p:/ {print \$2}")
services="$services $service"
done
services=$(echo $services | tr '\n' ' ' | sed -e's/\(^[[:space:]]*\|[[:space:]]*$\)//g')
if [ -z "$services" ] ; then
echo "none found."
else
echo "found: $services."
echo "Starting services which depend on erlang"
failed=""
rl=$(runlevel | awk '{print $2}')
for service in $services ; do
if which systemctl >/dev/null && systemctl >/dev/null 2>&1 ; then
echo -n " $service: starting... "
if systemctl start $service 2>/dev/null
then
echo "done."
else
echo "failed. ($?)"
failed="$failed $service"
fi
else
if which invoke-rc.d >/dev/null ; then
idl="invoke-rc.d ${service}"
elif [ -f /usr/share/file-rc/rc -o -f /usr/lib/file-rc/rc ] && [ -f /etc/runlevel.conf ] ; then
idl=$(filerc $rl $service)
else
idl=$(ls /etc/rc${rl}.d/S??${service} 2> /dev/null | head -1)
fi
if [ -n "$idl" ] ; then
echo -n " $service: starting... "
if $idl start > /dev/null 2>&1 ; then
echo "done."
else
echo "failed. ($?)"
failed="$failed $service"
fi
fi
fi
done
if [ -n "$failed" ] ; then
echo "The following services failed to start: $failed."
echo
echo "You will need to start them manually by running \`help'"
echo "If the service still fails to start, you may need to file a bug on"
echo "\`erlang' package or the service involved."
else
echo "Services started successfully."
fi
fi
fi
;;
esac
exit 0
|
