| [641] | 1 | #!/bin/bash | 
|---|
| [127] | 2 |  | 
|---|
|  | 3 | if [ "$initlname" = "" ]; then | 
|---|
|  | 4 | if [ "$lname" = "" ]; then | 
|---|
|  | 5 | initlname=0 | 
|---|
|  | 6 | else | 
|---|
|  | 7 | initlname=1 | 
|---|
|  | 8 | fi | 
|---|
|  | 9 | fi | 
|---|
|  | 10 |  | 
|---|
| [575] | 11 | if type wget >/dev/null 2>/dev/null; then | 
|---|
|  | 12 | WGET=wget | 
|---|
|  | 13 | else | 
|---|
|  | 14 | WGET="athrun gnu wget" | 
|---|
|  | 15 | fi | 
|---|
|  | 16 |  | 
|---|
| [127] | 17 | if [ "$lname" = "" ]; then | 
|---|
|  | 18 | if [ "$1" = "" ]; then | 
|---|
|  | 19 | echo | 
|---|
| [458] | 20 | echo "Would you like to sign up:" | 
|---|
|  | 21 | echo "1. Your personal Athena account" | 
|---|
|  | 22 | echo "2. A locker that you control (a club, a course, etc)" | 
|---|
|  | 23 | echo "If you do not understand this question, you should answer '1'." | 
|---|
| [127] | 24 | printf "Please enter either '1' or '2' (without quotes): " | 
|---|
|  | 25 | read whofor | 
|---|
| [458] | 26 | if [ "$whofor" = 1 ]; then | 
|---|
| [733] | 27 | lname="${ATHENA_USER:-$USER}" | 
|---|
| [458] | 28 | elif [ "$whofor" = 2 ]; then | 
|---|
| [127] | 29 | echo | 
|---|
| [458] | 30 | echo "OK.  A locker of your choice that you control will be signed up." | 
|---|
|  | 31 | echo "Please enter the name of the selected locker below." | 
|---|
| [127] | 32 | echo "(For the locker /mit/sipb, you would enter sipb)." | 
|---|
| [733] | 33 | printf "Locker name: " | 
|---|
|  | 34 | read lname | 
|---|
| [127] | 35 | else | 
|---|
|  | 36 | echo | 
|---|
| [458] | 37 | echo "ERROR:" | 
|---|
|  | 38 | echo "You must select either '1' or '2'." | 
|---|
| [127] | 39 | exit 1 | 
|---|
|  | 40 | fi | 
|---|
| [733] | 41 | while true; do | 
|---|
|  | 42 | if attach "$lname"; then | 
|---|
|  | 43 | break | 
|---|
|  | 44 | fi | 
|---|
|  | 45 | echo "$lname is not a valid locker name." | 
|---|
|  | 46 | printf "Locker name: " | 
|---|
|  | 47 | read lname | 
|---|
|  | 48 | done | 
|---|
| [127] | 49 | else | 
|---|
| [733] | 50 | lname="$1" | 
|---|
| [127] | 51 | fi | 
|---|
|  | 52 | fi | 
|---|
| [733] | 53 | lroot="/mit/$lname" | 
|---|
| [127] | 54 |  | 
|---|
| [726] | 55 | attach "$lname" 2>/dev/null | 
|---|
|  | 56 |  | 
|---|
| [629] | 57 | ans=`$WGET -q -O- "http://scripts.mit.edu/~signup/fsla.php/mit/$lname"` | 
|---|
|  | 58 | if [ "$ans" != "0" ]; then | 
|---|
|  | 59 | echo | 
|---|
|  | 60 | echo "ERROR:" | 
|---|
|  | 61 | echo "The scripts servers cannot verify the permissions of the locker <$lname>." | 
|---|
| [1429] | 62 | echo "This is probably because your locker is not publicly listable." | 
|---|
|  | 63 | echo "You can remedy this signup problem and make your locker publicly" | 
|---|
|  | 64 | echo "listable by running \"fs sa /mit/$lname system:anyuser l\" (with a" | 
|---|
|  | 65 | echo "lowercase L at the end).  Note that this will make it possible for" | 
|---|
|  | 66 | echo "anyone to see the names of your files and the list of people who" | 
|---|
|  | 67 | echo "have access to them, though it will not cause the contents of your" | 
|---|
|  | 68 | echo "files to be publicly readable.  If you are unwilling to have your" | 
|---|
|  | 69 | echo "locker listable by the public, please contact scripts@mit.edu" | 
|---|
|  | 70 | echo "for information about other ways to work around the problem." | 
|---|
| [629] | 71 | exit 1 | 
|---|
|  | 72 | fi | 
|---|
|  | 73 |  | 
|---|
| [576] | 74 | principal=`klist -5 | sed -n 's/^Default principal: // p'` | 
|---|
|  | 75 | ans=`$WGET -q -O- "http://scripts.mit.edu/~signup/admof.php/$lname/$principal"` | 
|---|
|  | 76 | if [ "$ans" != "yes" ]; then | 
|---|
|  | 77 | afsuser=`echo "$principal" | sed 's/@ATHENA.MIT.EDU$//'` | 
|---|
|  | 78 | echo | 
|---|
|  | 79 | echo "ERROR:" | 
|---|
|  | 80 | echo "It appears as though you are not an administrator of the locker <$lname>." | 
|---|
|  | 81 | echo "Try running \"fs sa /mit/$lname $afsuser all\" and starting over." | 
|---|
|  | 82 | echo "Contact scripts@mit.edu if you are unable to solve the problem." | 
|---|
|  | 83 | exit 1 | 
|---|
|  | 84 | fi | 
|---|
|  | 85 |  | 
|---|
| [660] | 86 | mkdir -p "/mit/$lname/.scripts-signup" | 
|---|
| [127] | 87 |  | 
|---|
|  | 88 | if [ ! -d "/mit/$lname/.scripts-signup" ]; then | 
|---|
|  | 89 | echo | 
|---|
| [458] | 90 | echo "ERROR:" | 
|---|
|  | 91 | echo "It appears as though you do not have write access to the locker <$lname>." | 
|---|
|  | 92 | echo "Contact scripts@mit.edu if you are unable to solve the problem." | 
|---|
| [502] | 93 | exit 1 | 
|---|
| [127] | 94 | fi | 
|---|
|  | 95 |  | 
|---|
| [502] | 96 | ans=`$WGET -q -O- "http://scripts.mit.edu/~signup/$lname"` | 
|---|
| [458] | 97 | rmdir "/mit/$lname/.scripts-signup" | 
|---|
|  | 98 |  | 
|---|
| [776] | 99 | if [ "$ans" = "done" ]; then | 
|---|
|  | 100 | # nscd caches account nonexistence with a 5-second TTL. | 
|---|
|  | 101 | # (LDAP updates are more or less instant.) | 
|---|
|  | 102 | # Somehow, the server can wait up to 10 seconds... | 
|---|
|  | 103 | echo "Creating scripts.mit.edu account for $lname..." | 
|---|
|  | 104 | sleep 10 | 
|---|
|  | 105 | fi | 
|---|
|  | 106 |  | 
|---|
| [502] | 107 | if [ "$ans" != "done" ] && [ "$ans" != "username already taken" ]; then | 
|---|
|  | 108 | echo "ERROR:" | 
|---|
|  | 109 | echo "Signup reported the following error: \"$ans\"." | 
|---|
|  | 110 | echo "Contact scripts@mit.edu for assistance." | 
|---|
|  | 111 | exit 1 | 
|---|
|  | 112 | fi | 
|---|
|  | 113 |  | 
|---|
| [127] | 114 | success() { | 
|---|
|  | 115 | if [ "$initlname" -eq 0 ]; then | 
|---|
|  | 116 | echo | 
|---|
|  | 117 | echo "== SUCCESS ==" | 
|---|
| [458] | 118 | echo "$lname is now signed up for $1." | 
|---|
|  | 119 | echo "$2" | 
|---|
| [127] | 120 | echo | 
|---|
|  | 121 | fi | 
|---|
|  | 122 | } | 
|---|