리얼맥에서 Airport를 이용해서 Internet Sharing을 할 수 있습니다. 공유기가 따로 필요없이 맥 자체가 공유기가 됩니다.
근데 이걸 끄고 켜는게 귀찮아서 애플스크립트로 자동화 중 입니다.
켜는 것은 잘되는데 끄는데서 문제가 있네요..
에어포트를 꺼주는 명령어 부분 do shell script "sudo networksetup -setairportpower AirPort off"이 실행이 됐다 안됐다하네요..
(이 부분 고칠 수 있으신 분 고쳐주세요^^)
우선 켜는 스크립트입니다 (Growl도 함께 됩니다. A. Davis란 분이 만든것을 Snow Leopard에 맞게 수정한 것입니다)
tell application "System Preferences" to set current pane to pane "com.apple.preferences.sharing"
tell application "System Events" to tell process "System Preferences"
click checkbox 1 of row 11 of table 1 of scroll area 1 of group 1 of window "Sharing"
delay 1
click button "Turn Airport On" of sheet 1 of window "Sharing"
delay 1
click button "Start" of sheet 1 of window "Sharing"
if (exists sheet 1 of window "Sharing") then
click button "Start" of sheet 1 of window "Sharing"
end if
try
set message to "Internet Connection Sharing Enabled"
my growlnote("General Notification", message)
on error
set message to "Internet Connection Sharing Failed"
my growlnote("error notification", message)
end try
end tell
ignoring application responses
tell application "System Preferences" to quit
end ignoring
on register_growl()
try
tell application "GrowlHelperApp"
set the allNotificationsList to {"General Notification", "Debug Notification", "Error Notification"}
set the enabledNotificationsList to {"General Notification", "Debug Notification", "Error Notification"}
register as application "Enable Internet Connection Sharing" all notifications allNotificationsList default notifications enabledNotificationsList icon of application "Sharing"
end tell
end try
end register_growl
on growlnote(growltype, str)
try
tell application "GrowlHelperApp"
notify with name growltype title growltype description str application name "Enable Internet Connection Sharing"
end tell
end try
end growlnote
자동으로 끄는 부분입니다.
register_growl()
tell application "System Preferences" to set current pane to pane "com.apple.preferences.sharing"
tell application "System Events" to tell process "System Preferences"
click checkbox 1 of row 11 of table 1 of scroll area 1 of group 1 of window "Sharing"
delay 1 do shell script "sudo networksetup -setairportpower AirPort off"
try
set message to "Internet Connection Sharing Disabled"
my growlnote("General Notification", message)
on error
set message to "Internet Connection Sharing was Not Enabled"
my growlnote("error notification", message)
end try
end tell
ignoring application responses
tell application "System Preferences" to quit
end ignoring
on register_growl()
try
tell application "GrowlHelperApp"
set the allNotificationsList to {"General Notification", "Debug Notification", "Error Notification"}
set the enabledNotificationsList to {"General Notification", "Debug Notification", "Error Notification"}
register as application "Enable Internet Connection Sharing" all notifications allNotificationsList default notifications enabledNotificationsList icon of application "Sharing"
end tell
end try
end register_growl
on growlnote(growltype, str)
try
tell application "GrowlHelperApp"
notify with name growltype title growltype description str application name "Enable Internet Connection Sharing"
end tell
end try
end growlnote
Date: 2010-05-22 12:32
Read: 2191
