#!/bin/sh

MOM_CONFIG=/var/spool/torque/mom_priv/config

sed_quote()
{
    echo "$1"|sed 's,[$()./],\\&,g'
}

mom_write()
{
    local name="$1";shift
    local value="$1";shift

    [ ! -s "$MOM_CONFIG" ] || sed -r "/$(sed_quote "$name")[[:space:]]/ d" -i "$MOM_CONFIG"
    printf '%s %s\n' "$name" "$value" >> "$MOM_CONFIG"
}

. /usr/share/alterator/build/backend3.sh

on_message()
{
	case "$in_action" in
		write)
			case "$in__objects" in
			    mom)
				[ -n "$in_pbsserver" ] && mom_write '$pbsserver' "$in_pbsserver"
		    		echo '()'
				;;
			    *)  echo '(error "unknown torque object for configuration")'
				;;
			esac
			;;
		*)
			echo '#f'
			;;
	esac
}

message_loop
