| [1748] | 1 | #!/bin/bash | 
|---|
 | 2 | set -e | 
|---|
 | 3 |  | 
|---|
 | 4 | printf "Host name: " >&2 | 
|---|
 | 5 | if [ "$1" ]; then | 
|---|
 | 6 |     host="$1"; shift | 
|---|
 | 7 |     echo "$host" | 
|---|
 | 8 | else | 
|---|
 | 9 |     read host | 
|---|
 | 10 | fi | 
|---|
 | 11 |  | 
|---|
 | 12 | if ! grep -Fq "." <<< "$host"; then host=$host.mit.edu; fi | 
|---|
 | 13 |  | 
|---|
 | 14 | printf "User: " >&2 | 
|---|
 | 15 | if [ "$1" ]; then | 
|---|
 | 16 |     user="$1"; shift | 
|---|
 | 17 |     echo "$user" | 
|---|
 | 18 | else | 
|---|
 | 19 |     read user | 
|---|
 | 20 | fi | 
|---|
 | 21 |  | 
|---|
 | 22 | while read attr value; do | 
|---|
 | 23 |     echo "$attr" "$value" | 
|---|
 | 24 |     case "$attr" in | 
|---|
 | 25 |         dn:) user_dn=$value;; | 
|---|
 | 26 |         uid:) user=$value;; | 
|---|
 | 27 |         uidNumber:) uid=$value;; | 
|---|
 | 28 |         gidNumber:) gid=$value;; | 
|---|
 | 29 |         homeDirectory:) home=$value;; | 
|---|
 | 30 |     esac | 
|---|
 | 31 | done < <(ldapsearch -LLL -x -h scripts.mit.edu -b ou=People,dc=scripts,dc=mit,dc=edu "(uid=$user)" dn uid uidNumber gidNumber homeDirectory | perl -0pe 's/\n //g;') | 
|---|
 | 32 |  | 
|---|
 | 33 | printf "Docroot: $home/web_scripts" >&2 | 
|---|
 | 34 | read subdir | 
|---|
| [2735] | 35 | subdir=${subdir%/} | 
|---|
 | 36 | docroot=$home/web_scripts$subdir | 
|---|
 | 37 | path=${subdir#/} | 
|---|
 | 38 | path=${path:-.} | 
|---|
| [1748] | 39 |  | 
|---|
 | 40 | tmpfile=$(mktemp -t vhostadd.XXXXXX) || exit $? | 
|---|
 | 41 | trap 'rm -f "$tmpfile"' EXIT | 
|---|
 | 42 |  | 
|---|
 | 43 | cat <<EOF > "$tmpfile" | 
|---|
 | 44 | dn: apacheServerName=$host,ou=VirtualHosts,dc=scripts,dc=mit,dc=edu | 
|---|
 | 45 | objectClass: apacheConfig | 
|---|
 | 46 | objectClass: top | 
|---|
 | 47 | apacheServerName: $host | 
|---|
 | 48 | EOF | 
|---|
 | 49 |  | 
|---|
 | 50 | if [ "${host%mit.edu}" != "$host" ]; then | 
|---|
 | 51 |     cat <<EOF >> "$tmpfile" | 
|---|
 | 52 | apacheServerAlias: ${host%.mit.edu} | 
|---|
 | 53 | EOF | 
|---|
 | 54 | fi | 
|---|
 | 55 |  | 
|---|
 | 56 | cat <<EOF >> "$tmpfile" | 
|---|
| [2735] | 57 | apacheDocumentRoot: $docroot | 
|---|
| [1748] | 58 | apacheSuexecUid: $uid | 
|---|
 | 59 | apacheSuexecGid: $gid | 
|---|
 | 60 |  | 
|---|
 | 61 | dn: scriptsVhostName=$host,ou=VirtualHosts,dc=scripts,dc=mit,dc=edu | 
|---|
 | 62 | objectClass: scriptsVhost | 
|---|
 | 63 | objectClass: top | 
|---|
 | 64 | scriptsVhostName: $host | 
|---|
 | 65 | EOF | 
|---|
 | 66 |  | 
|---|
 | 67 | if [ "${host%mit.edu}" != "$host" ]; then | 
|---|
 | 68 |     cat <<EOF >> "$tmpfile" | 
|---|
 | 69 | scriptsVhostAlias: ${host%.mit.edu} | 
|---|
 | 70 | EOF | 
|---|
 | 71 | fi | 
|---|
 | 72 |  | 
|---|
 | 73 | cat <<EOF >> "$tmpfile" | 
|---|
 | 74 | scriptsVhostAccount: $user_dn | 
|---|
| [2735] | 75 | scriptsVhostDirectory: $path | 
|---|
| [1748] | 76 | EOF | 
|---|
 | 77 |  | 
|---|
| [1749] | 78 | exec ldapvi --bind sasl -Y GSSAPI -h scripts5.mit.edu -b dc=scripts,dc=mit,dc=edu --add --in "$tmpfile" | 
|---|