[61f19e0] | 1 | #!/usr/local/bin/perl |
---|
| 2 | |
---|
[45ed8ee] | 3 | ############################################################################# |
---|
| 4 | # smbmounts.pl: Setup Automounter to mount via SMB for federated experiments |
---|
| 5 | # $Id: smbmount.pl,v 1.3 2007-09-27 02:50:14 jhickey Exp $ |
---|
| 6 | # |
---|
| 7 | |
---|
| 8 | $ADDR="users.isi.deterlab.net"; |
---|
[61f19e0] | 9 | $TMCC="/usr/local/etc/emulab/tmcc"; |
---|
[45ed8ee] | 10 | $SHARE="USERS"; |
---|
| 11 | $FSTAB="/etc/fstab"; |
---|
| 12 | $HOMEROOT="/users"; |
---|
| 13 | $AMDROOT="/auto"; |
---|
| 14 | $AMDMAP="/etc/amd.users"; |
---|
[61f19e0] | 15 | |
---|
[45ed8ee] | 16 | $UMOUNT="/sbin/umount"; |
---|
| 17 | $MOUNT="/sbin/mount"; |
---|
| 18 | $MKDIR="/bin/mkdir"; |
---|
| 19 | $CP="/bin/cp"; |
---|
| 20 | $KILLALL="/usr/bin/killall"; |
---|
| 21 | $AMD="/usr/sbin/amd"; |
---|
[61f19e0] | 22 | |
---|
[45ed8ee] | 23 | print "Killing amd.\n"; |
---|
| 24 | system("$KILLALL amd"); |
---|
[61f19e0] | 25 | |
---|
[45ed8ee] | 26 | print "Unmounting all nfs and smb filesystems.\n"; |
---|
| 27 | system("$UMOUNT -A -f -t nfs,smbfs"); # or die("Failed to unmount NFS"); |
---|
[61f19e0] | 28 | |
---|
[45ed8ee] | 29 | # Backup the fstab so we can run multiple times |
---|
| 30 | if (! -f "$FSTAB.bak") { |
---|
| 31 | system("$CP $FSTAB $FSTAB.bak") && die("Unable to backup $FSTAB"); |
---|
| 32 | } else { |
---|
| 33 | system("$CP $FSTAB.bak $FSTAB") && die("Unable to restore $FSTAB"); |
---|
| 34 | } |
---|
| 35 | |
---|
| 36 | open(TM, "$TMCC accounts windows |") or die("Failed to execute TMCC"); |
---|
[61f19e0] | 37 | open(CONFIG, ">/etc/nsmb.conf") or die("Failed to open /etc/nsmb.conf"); |
---|
[45ed8ee] | 38 | open(MAP, ">$AMDMAP") or die("Failed to open /etc/amd.users"); |
---|
| 39 | open(FSTAB,">>$FSTAB") or die("Cannot Open File $FSTAB"); |
---|
[61f19e0] | 40 | |
---|
[45ed8ee] | 41 | print FSTAB "\n# SMB Configuration Generated by smbmount.pl\n"; |
---|
| 42 | print MAP "# AMD Configuration Generated by smbmount.pl\n"; |
---|
| 43 | print CONFIG "# SMB Configuration Generated by smbmount.pl\n\n"; |
---|
[61f19e0] | 44 | print CONFIG "[$SHARE]\naddr=$ADDR\n\n"; |
---|
| 45 | |
---|
| 46 | while(<TM>) { |
---|
| 47 | if (/ADDUSER LOGIN=(\S+) PSWD=(\S+) UID=(\d+) GID=(\d+).*HOMEDIR=(\S+) / ) { |
---|
| 48 | $user = $1; |
---|
| 49 | $pswd = $2; |
---|
| 50 | $uid = $3; |
---|
| 51 | $gid = $4; |
---|
| 52 | $homedir = $5; |
---|
| 53 | |
---|
[45ed8ee] | 54 | $userlc = $user; |
---|
| 55 | # SMB demands upper case. |
---|
| 56 | $user =~ tr/a-z/A-Z/; |
---|
| 57 | my $pass = `smbutil crypt '$pswd'`; |
---|
[61f19e0] | 58 | |
---|
| 59 | print CONFIG "[$SHARE:$user]\npassword=$pass\n"; |
---|
[45ed8ee] | 60 | |
---|
| 61 | if(! -d "$AMDROOT$homedir") { |
---|
| 62 | system("$MKDIR -p $AMDROOT$homedir") && die("Failed to make directory"); |
---|
[61f19e0] | 63 | } |
---|
[45ed8ee] | 64 | |
---|
| 65 | print FSTAB "//$user\@$SHARE/$user\t"; |
---|
| 66 | print FSTAB "$AMDROOT$homedir\tsmbfs\t"; |
---|
| 67 | print FSTAB "noauto,rw,-N,-f744,-d755,-u$uid,-g$gid\t0\t0\n"; |
---|
| 68 | |
---|
| 69 | print MAP "\n$userlc type:=program;fs:=$AMDROOT$homedir;\\\n"; |
---|
| 70 | print MAP "mount:=\"$MOUNT mount $AMDROOT$homedir\";\\\n"; |
---|
| 71 | print MAP "unmount:=\"$UMOUNT unmount $AMDROOT$homedir\";"; |
---|
[61f19e0] | 72 | } |
---|
| 73 | } |
---|
| 74 | |
---|
| 75 | close(CONFIG); |
---|
[45ed8ee] | 76 | close(FSTAB); |
---|
| 77 | close(MAP); |
---|
[61f19e0] | 78 | |
---|
[45ed8ee] | 79 | print "Starting the automounter: $AMD -l syslog -a $AMDROOT $HOMEROOT $AMDMAP\n"; |
---|
| 80 | system("$AMD -l syslog -a $AMDROOT $HOMEROOT $AMDMAP") && die("Unable to start amd"); |
---|