| [127] | 1 | #!/bin/sh | 
|---|
 | 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 | 
|---|
| [127] | 27 |         lname=$USER | 
|---|
 | 28 |         lroot=$HOME | 
|---|
| [458] | 29 |     elif [ "$whofor" = 2 ]; then | 
|---|
| [127] | 30 |         echo | 
|---|
| [458] | 31 |         echo "OK.  A locker of your choice that you control will be signed up." | 
|---|
 | 32 |         echo "Please enter the name of the selected locker below." | 
|---|
| [127] | 33 |         echo "(For the locker /mit/sipb, you would enter sipb)." | 
|---|
 | 34 |         printf "Locker name: " | 
|---|
 | 35 |         read lname | 
|---|
 | 36 |         lroot="/mit/$lname" | 
|---|
 | 37 |     else | 
|---|
 | 38 |         echo | 
|---|
| [458] | 39 |         echo "ERROR:" | 
|---|
 | 40 |         echo "You must select either '1' or '2'." | 
|---|
| [127] | 41 |         exit 1 | 
|---|
 | 42 |     fi | 
|---|
 | 43 |   else | 
|---|
 | 44 |     lname=$1 | 
|---|
 | 45 |   fi | 
|---|
 | 46 | fi | 
|---|
 | 47 |  | 
|---|
| [458] | 48 | attach "$lname" 2>/dev/null | 
|---|
| [127] | 49 |  | 
|---|
 | 50 | if [ ! -d "/mit/$lname" ]; then | 
|---|
 | 51 |   echo | 
|---|
| [458] | 52 |   echo "ERROR:" | 
|---|
 | 53 |   echo "Cannot find locker <$lname>." | 
|---|
| [502] | 54 |   exit 1 | 
|---|
| [127] | 55 | fi | 
|---|
 | 56 |  | 
|---|
| [576] | 57 | principal=`klist -5 | sed -n 's/^Default principal: // p'` | 
|---|
 | 58 | ans=`$WGET -q -O- "http://scripts.mit.edu/~signup/admof.php/$lname/$principal"` | 
|---|
 | 59 | if [ "$ans" != "yes" ]; then | 
|---|
 | 60 |   afsuser=`echo "$principal" | sed 's/@ATHENA.MIT.EDU$//'` | 
|---|
 | 61 |   echo | 
|---|
 | 62 |   echo "ERROR:" | 
|---|
 | 63 |   echo "It appears as though you are not an administrator of the locker <$lname>." | 
|---|
 | 64 |   echo "Try running \"fs sa /mit/$lname $afsuser all\" and starting over." | 
|---|
 | 65 |   echo "Contact scripts@mit.edu if you are unable to solve the problem." | 
|---|
 | 66 |   exit 1 | 
|---|
 | 67 | fi | 
|---|
 | 68 |  | 
|---|
| [458] | 69 | ans=`fs la "/mit/$lname" | grep '^  system:a[nyuth]*user .*l'` | 
|---|
 | 70 | if [ -z "$ans" ]; then | 
|---|
| [184] | 71 |   echo | 
|---|
| [458] | 72 |   echo "ERROR:" | 
|---|
 | 73 |   echo "It appears as though the locker <$lname> is not listable by system:anyuser." | 
|---|
 | 74 |   echo "You might want to run \"fs sa /mit/$lname system:anyuser l\"" | 
|---|
 | 75 |   echo "(that's a lowercase L rather than a one) and then try again." | 
|---|
 | 76 |   echo "Contact scripts@mit.edu if you are unable to solve the problem." | 
|---|
| [502] | 77 |   exit 1 | 
|---|
| [184] | 78 | fi | 
|---|
 | 79 |  | 
|---|
| [458] | 80 | mkdir "/mit/$lname/.scripts-signup" 2>/dev/null | 
|---|
| [127] | 81 |  | 
|---|
 | 82 | if [ ! -d "/mit/$lname/.scripts-signup" ]; then | 
|---|
 | 83 |   echo | 
|---|
| [458] | 84 |   echo "ERROR:" | 
|---|
 | 85 |   echo "It appears as though you do not have write access to the locker <$lname>." | 
|---|
 | 86 |   echo "Contact scripts@mit.edu if you are unable to solve the problem." | 
|---|
| [502] | 87 |   exit 1 | 
|---|
| [127] | 88 | fi | 
|---|
 | 89 |  | 
|---|
| [502] | 90 | ans=`$WGET -q -O- "http://scripts.mit.edu/~signup/$lname"` | 
|---|
| [458] | 91 | rmdir "/mit/$lname/.scripts-signup" | 
|---|
 | 92 |  | 
|---|
| [502] | 93 | if [ "$ans" != "done" ] && [ "$ans" != "username already taken" ]; then | 
|---|
 | 94 |   echo "ERROR:" | 
|---|
 | 95 |   echo "Signup reported the following error: \"$ans\"." | 
|---|
 | 96 |   echo "Contact scripts@mit.edu for assistance." | 
|---|
 | 97 |   exit 1 | 
|---|
 | 98 | fi | 
|---|
 | 99 |  | 
|---|
| [127] | 100 | success() { | 
|---|
 | 101 |   if [ "$initlname" -eq 0 ]; then | 
|---|
 | 102 |     echo | 
|---|
 | 103 |     echo "== SUCCESS ==" | 
|---|
| [458] | 104 |     echo "$lname is now signed up for $1." | 
|---|
 | 105 |     echo "$2" | 
|---|
| [127] | 106 |     echo | 
|---|
 | 107 |   fi | 
|---|
 | 108 | } | 
|---|