e1a6c1ffd5
This allows control which services are started in VM by dom0. For some situation vm_type was used, but it isn't enough - i.e. ntpd should be started in one, selected NetVM.
94 lines
2.2 KiB
Bash
Executable File
94 lines
2.2 KiB
Bash
Executable File
#!/bin/sh
|
|
#
|
|
# chkconfig: 345 85 85
|
|
# description: Executes Qubes core scripts at AppVM boot
|
|
#
|
|
# Source function library.
|
|
. /etc/rc.d/init.d/functions
|
|
|
|
possibly_run_save_script()
|
|
{
|
|
ENCODED_SCRIPT=$(xenstore-read qubes_save_script)
|
|
if [ -z "$ENCODED_SCRIPT" ] ; then return ; fi
|
|
echo $ENCODED_SCRIPT|perl -e 'use MIME::Base64 qw(decode_base64); local($/) = undef;print decode_base64(<STDIN>)' >/tmp/qubes_save_script
|
|
chmod 755 /tmp/qubes_save_script
|
|
Xorg -config /etc/X11/xorg-preload-apps.conf :0 &
|
|
sleep 2
|
|
DISPLAY=:0 su - user -c /tmp/qubes_save_script
|
|
killall Xorg
|
|
}
|
|
|
|
start()
|
|
{
|
|
if ! [ -x /usr/bin/xenstore-read ] ; then
|
|
echo "ERROR: /usr/bin/xenstore-read not found!"
|
|
exit 1
|
|
fi
|
|
|
|
type=$(/usr/bin/xenstore-read qubes_vm_type)
|
|
if [ "$type" != "AppVM" -a "$type" != "DisposableVM" -a "$type" != "TemplateVM" ]; then
|
|
# This script runs only on AppVMs
|
|
return 0
|
|
fi
|
|
|
|
# Start AppVM specific services
|
|
start_cups=$(/usr/bin/xenstore-read qubes-service/cups 2> /dev/null)
|
|
if [ "$start_cups" != "0" ]; then
|
|
/sbin/service cups start
|
|
# Allow also notification icon
|
|
sed -i -e '/^NotShowIn=.*QUBES/s/;QUBES//' /etc/xdg/autostart/print-applet.desktop
|
|
else
|
|
# Disable notification icon
|
|
sed -i -e '/QUBES/!s/^NotShowIn=.*/\1QUBES;/' /etc/xdg/autostart/print-applet.desktop
|
|
fi
|
|
|
|
echo -n $"Executing Qubes Core scripts for AppVM:"
|
|
|
|
if xenstore-read qubes_save_request 2>/dev/null ; then
|
|
ln -sf /home_volatile /home
|
|
possibly_run_save_script
|
|
touch /etc/this_is_dvm
|
|
dmesg -c >/dev/null
|
|
free | grep Mem: |
|
|
(read a b c d ; xenstore-write device/qubes_used_mem $c)
|
|
# we're still running in DispVM template
|
|
echo "Waiting for save/restore..."
|
|
# ... wait until qubes_restore.c (in Dom0) recreates VM-specific keys
|
|
while ! xenstore-read qubes_restore_complete 2>/dev/null ; do
|
|
usleep 10
|
|
done
|
|
echo Back to life.
|
|
fi
|
|
|
|
start_meminfo_writer=$(/usr/bin/xenstore-read qubes-service/meminfo-writer)
|
|
if [ "$start_meminfo_writer" != "0" ]; then
|
|
MEM_CHANGE_THRESHOLD_KB=30000
|
|
MEMINFO_DELAY_USEC=100000
|
|
/usr/lib/qubes/meminfo-writer $MEM_CHANGE_THRESHOLD_KB $MEMINFO_DELAY_USEC &
|
|
fi
|
|
|
|
success
|
|
echo ""
|
|
return 0
|
|
}
|
|
|
|
stop()
|
|
{
|
|
return 0
|
|
}
|
|
|
|
case "$1" in
|
|
start)
|
|
start
|
|
;;
|
|
stop)
|
|
stop
|
|
;;
|
|
*)
|
|
echo $"Usage: $0 {start|stop}"
|
|
exit 3
|
|
;;
|
|
esac
|
|
|
|
exit $RETVAL
|