#!/bin/sh

PATH="/usr/sbin:/usr/bin:/sbin:/bin:$PATH"
VAR_LIST="LLIUREX_TCOS_CLIENT"
LLX_GETVAR="/usr/sbin/llxcfg-showvars"
eval `${LLX_GETVAR} ${VAR_LIST}`

[ "$LLIUREX_TCOS_CLIENT" = "Y" ] || exit 0
[ "$1" = "postsession" ] || exit 0

export XAUTHORITY="$(LC_ALL=C xauth info | awk '/^Authority file/{print $3}')"


index_esound=$(LC_ALL=C pactl list | grep -B1 "module-esound-protocol-tcp" | sed -ne "/^Module/p" | sed -e 's/^Module.*\#\([[:digit:]]\+\).*$/\1/g')
index_native=$(LC_ALL=C pactl list | grep -B1 "module-native-protocol-tcp" | sed -ne "/^Module/p" | sed -e 's/^Module.*\#\([[:digit:]]\+\).*$/\1/g')

for index in $index_esound $index_native; do
    XAUTHORITY=$XAUTHORITY DISPLAY=$DISPLAY pactl unload-module $index >/dev/null 2>&1
done

exit 0