source: trunk/scripts/osx-update.applescript @ 1860

Last change on this file since 1860 was 1785, checked in by broder, 16 years ago

Applescript for Mac users of kdo to open a tab for each server and connect

File size: 936 bytes
RevLine 
[1785]1set hosts to {"citadel-station.mit.edu", "aperture-science.mit.edu", "shadow-moses.mit.edu", "arklay-mansion.mit.edu", "xvm.mit.edu", "xvm-remote.mit.edu", "xvm-console.mit.edu"}
2
3tell application "Terminal"
4        activate
5        tell application "System Events" to tell process "Terminal" to keystroke "n" using command down
6       
7        set onFirst to true
8        repeat with host in hosts
9                if onFirst is true then
10                        set onFirst to false
11                        do script with command "kdo ${ATHENA_USER:-$USER}/root </dev/null >/dev/null" in selected tab of the first window
12                else
13                        tell application "System Events" to tell process "Terminal" to keystroke "t" using command down
14                end if
15                do script with command "kdo ${ATHENA_USER:-$USER}/root ssh -o GSSAPIDelegateCredentials=no root@" & host in selected tab of the front window
16                do script with command "aptitude update && aptitude dist-upgrade --without-recommends" in selected tab of the front window
17        end repeat
18end tell
Note: See TracBrowser for help on using the repository browser.