#!/bin/sh

exports()
{
	. ~/.exports
}

agent()
{
	eval "$(gpg-agent --daemon --enable-ssh-support)"
}

xinput()
{
	xmodmap "${HOME}/.Xmodmap"
	export GTK_IM_MODULE='xim'
	export QT_IM_MODULE='xim'
	xinput set-prop 'TPPS/2 IBM TrackPoint' 'Evdev Wheel Emulation' 1
	xinput set-prop 'TPPS/2 IBM TrackPoint' 'Evdev Wheel Emulation Button' 2
	xinput set-prop 'TPPS/2 IBM TrackPoint' 'Evdev Wheel Emulation Timeout'\
		200
	xinput set-prop 'TPPS/2 IBM TrackPoint' 'Evdev Wheel Emulation Axes' \
		6 7 4 5
}

start()
{
	exports
	agent
	xinput

	startfluxbox
}

run()
{
	rm -f ~/.xsessionmanage
	mkfifo -m 0600 ~/.xsessionmanage
	while read action; do
		case "${action}" in
			'reload')
				reload
				;;
			'quit')
				break
				;;
		esac
	done <~/.xsessionmanage
	rm -f ~/.xsessionmanage
}

main()
{
	start

	run
}