2 # Alex Dehnert --- 2009-04-23
3 # Attempt to update the list of UA lists
4 # Takes the container mailing lists on the commandline
10 prev=${prev:-ua-lists}
11 anti=${anti:-ua-foreign-lists}
12 nativepat=${nativepat:-ua}
17 for list in $(blanche $prev | grep LIST | cut -d : -f 2); do # for each list we already know about
18 # Add a list's sublists
19 for newlist in $(blanche $list | grep LIST | cut -d : -f 2); do
20 blanche $prev -a $newlist;
22 # Add a list's owner and memacl
23 owner=$(athrun ops qy -s -f ace_name glin $list)
24 towner=$(athrun ops qy -s -f ace_type glin $list)
25 if [[ "$towner" == "LIST" ]]; then
26 blanche $prev -a $owner
28 macl=$(athrun ops qy -s -f memace_name glin $list)
29 tmacl=$(athrun ops qy -s -f memace_type glin $list)
30 if [[ "$tmacl" == "LIST" ]]; then
31 blanche $prev -a $macl
34 ) 2>&1 | grep -v "Record already exists"
37 echo Current members: $(blanche $prev -m | wc)
38 echo Expanding out lists
41 echo New members: $(blanche $prev -m | wc)
42 echo Removing foreign lists
43 for list in $(blanche $anti | grep LIST | cut -d : -f 2); do blanche $prev -d $list; done
44 echo Finalized members: $(blanche $prev -m | wc)
47 echo Likely foreign members
48 blanche $prev | grep LIST: | sed -e "s/^LIST://" | grep -v $nativepat