2 DIR=/etc/remctl/sipb-xen-auto
3 TEMPLATE=$DIR/conf.template
4 MACHINEDIR=$DIR/machine.d
5 MOIRADIR=$DIR/moira-acl
6 MOIRATMP=$DIR/moira-tmp
7 MACHINETMP=$DIR/machine-list-tmp
8 AUTOMACHINELIST=$DIR/auto-machine-list
9 AUTOMOIRALIST=$DIR/auto-moira-list
16 sed "s/#MACHINENAME#/$machine/g" "$TEMPLATE" | \
17 sed "s,#BINDIR#,$BINDIR,g" >| "$MACHINETMP"
18 if ! cmp -s "$MACHINEDIR/$machine" "$MACHINETMP"; then
19 mv "$MACHINETMP" "$MACHINEDIR/$machine"
28 # Should perhaps replace with LDAP, but fine for now.
30 # We should do more careful error checking so we don't take away
31 # all bits and delete the moira-acl files whenever there's an AFS
33 pts membership system:"$group" -noauth | tail -n+2 | \
36 sed 's/$/@ATHENA.MIT.EDU/g' >| "$MOIRATMP"
37 if test -s "$MOIRATMP"; then
38 if ! cmp -s "$MOIRADIR/$group" "$MOIRATMP"; then
39 mv "$MOIRATMP" "$MOIRADIR/$group"
42 if test -e "$MOIRADIR/$group"; then
51 update_moiragroup "$2"
55 # update the remctl.conf definitions
56 for machine in `cat "$AUTOMACHINELIST"`; do
57 update_machine "$machine"
61 # update our moira ACL lists
62 for group in `cat "$AUTOMOIRALIST"`; do
63 update_moiragroup "$group"
67 # update the list of maintained machines
68 /bin/ls "$ACLDIR" >| "$AUTOMACHINELIST"
71 # update the moira list-of-lists
72 # /bin/ls "$MOIRADIR" >| "$AUTOMOIRALIST" # BAD IDEA in case of outage
74 # This extracts the list of all moira lists we care about, and updates those.
75 grep -R moira "$ACLDIR/" /etc/remctl/acl/ | perl -pe 's/.*moira-acl\/(.*)/$1/g' >| "$AUTOMOIRALIST"
79 rm -f "$ACLDIR"/"$machine"
80 rm -f "$MACHINEDIR"/"$machine"
86 mv "$ACLDIR"/"$oldmachine" "$ACLDIR"/"$newmachine"
87 rm -f "$MACHINEDIR"/"$oldmachine"
92 if [ "$machine" == "Domain-0" ]; then
93 echo "No, you can't control Domain 0"
96 if [ -e /etc/xen/"$machine" ]; then
97 echo "Machine already exists outside database"
100 if [ -e "$ACLDIR"/"$machine" ]; then
101 echo "Machine already registered"
104 echo "include /etc/remctl/acl/web" > "$ACLDIR/$machine"
108 "$0" auto_machine_list
111 remctl-moira-update|all)
112 "$0" auto_machine_list