#!/sbin/runscript

opts="start stop restart slow fast info"

depend() {
	need net
}

start() {
	ebegin "Starting MLDonkey Mulus"
	if [ ! -d ${BASEDIR}/${SUBDIR} ]
	then
		einfo "Directory ${BASEDIR}/${SUBDIR} not existing, trying to create..."
		if [ ! -d ${BASEDIR} ]
		then
			mkdir -p ${BASEDIR}
			chown ${USER}:users ${BASEDIR}
			if [ ! -d ${BASEDIR} ]
			then
				eerror "Directory ${BASEDIR} could not be created!"
				return 1
			fi
		fi
		su ${USER} -c "mkdir ${BASEDIR}/${SUBDIR}"
		if [ ! -d ${BASEDIR}/${SUBDIR} ]
		then
			eerror "Directory ${BASEDIR}/${SUBDIR} could not be created!"
			return 1
		fi
		einfo "...ok!"
	fi
	cd ${BASEDIR}/${SUBDIR}/
	env HOME=${BASEDIR} start-stop-daemon --quiet --start -c ${USER}  \
		-x /usr/bin/mulus &>${LOG} &
	sleep 5
	if ! pgrep -u ${USER} mulus >/dev/null
	then
		eerror "MLDonkey Mulus could not be started! Check logfile: ${LOG}"
	fi
	for i in `pgrep -u ${USER} mulus`
	do
		renice ${NICE} -p $i > /dev/null
	done
	eend $?
}

stop() {
	BASE="http://"
	if [[ -n ${USERNAME} && -n ${PASSWORD} ]]
	then
		BASE=${BASE}${USERNAME}:${PASSWORD}@
	fi
	BASE=${BASE}${SERVER}:${PORT}
	ebegin "Stopping MLDonkey Mulus - please wait"
	wget --spider ${BASE}/submit?q=close_fds -q
	wget --spider ${BASE}/submit?q=save -q
	wget --spider ${BASE}/submit?q=kill -q
	# give it a chance to die:
	local timeout=10
	while [ $timeout -gt 0 ] && pgrep -u ${USER} mulus &>/dev/null; do
		sleep 1
		let 'timeout--'
	done
	start-stop-daemon --oknodo --stop -x /usr/bin/mulus &>/dev/null
	eend $?
}

restart() {
	svc_stop
	sleep 5
	svc_start
}

slow() {
	if ! service_started mulus
	then
		start_service mulus
	fi
	ebegin "Reducing bandwidth to ${LOW_DOWN}k/${LOW_UP}k"

	BASE="http://"
	if [[ -n ${USERNAME} && -n ${PASSWORD} ]]
	then
		BASE=${BASE}${USERNAME}:${PASSWORD}@
	fi
	BASE=${BASE}${SERVER}:${PORT}

	wget --spider ${BASE}/submit?q=set+max_hard_download_rate+${LOW_DOWN} -q

	wget --spider ${BASE}/submit?q=set+max_hard_upload_rate+${LOW_UP} -q

	eend $?
}

fast() {
	if ! service_started mulus
	then
		start_service mulus
	fi
	ebegin "Increasing bandwidth to ${HIGH_DOWN}k/${HIGH_UP}k"

	BASE="http://"
	if [[ -n ${USERNAME} && -n ${PASSWORD} ]]
	then
		BASE=${BASE}${USERNAME}:${PASSWORD}@
	fi
	BASE=${BASE}${SERVER}:${PORT}

	wget --spider ${BASE}/submit?q=set+max_hard_download_rate+${HIGH_DOWN} -q

	wget --spider ${BASE}/submit?q=set+max_hard_upload_rate+${HIGH_UP} -q

	eend $?
}


info() {
	if service_started mulus
	then
		BASE="http://"
		if [[ -n ${USERNAME} && -n ${PASSWORD} ]]
		then
			BASE=${BASE}${USERNAME}:${PASSWORD}@
		fi

		BASE=${BASE}${SERVER}:${PORT}
		VALUE=$(/usr/bin/wget -O - ${BASE}/submit?q=vo 2> /dev/null| /bin/grep	-C1 max_hard_upload|/usr/bin/tail -n 1|/bin/cut -d\" -f2)
		if [[ ${VALUE} -eq ${LOW_UP} ]]
		then
			INFO="MLDonkey Mulus runs slow"
		else
			INFO="MLDonkey Mulus runs fast"
		fi
	else
		INFO="MLDonkey Mulus is not running"
	fi
	einfo "$INFO"
}