cpython/Mac/Modules/ae/nsremote.py

77 lines
1.7 KiB
Python

"""nsremote - Control Netscape from python.
Interface modelled after unix-interface done
by hassan@cs.stanford.edu.
Jack Jansen, CWI, January 1996.
"""
#
# Note: this module currently uses the funny SpyGlass AppleEvents, since
# these seem to be the only way to get the info from Netscape. It would
# be nicer to use the more "object oriented" standard OSA stuff, when it
# is implemented in Netscape.
#
import addpack
import sys
addpack.addpack('Tools')
addpack.addpack('bgen')
addpack.addpack('ae')
import aetools
import Standard_Suite
import WWW_Suite
import MacOS
class Netscape(aetools.TalkTo, Standard_Suite.Standard_Suite, WWW_Suite.WWW_Suite):
pass
SIGNATURE='MOSS'
Error = 'nsremote.Error'
_talker = None
def _init():
global _talker
if _talker == None:
_talker = Netscape(SIGNATURE)
def list(dpyinfo=""):
_init()
list = _talker.list_windows()
return map(lambda x: (x, 'version unknown'), list)
def geturl(windowid=0, dpyinfo=""):
_init()
if windowid == 0:
ids = _talker.list_windows()
if not ids:
raise Error, 'No netscape windows open'
windowid = ids[0]
info = _talker.get_window_info(windowid)
return info
def openurl(url, windowid=0, dpyinfo=""):
_init()
if windowid == 0:
_talker.OpenURL(url)
else:
_talker.OpenURL(url, toWindow=windowid)
def _test():
"""Test program: Open www.python.org in all windows, then revert"""
import sys
windows_and_versions = list()
windows_and_urls = map(lambda x: (x[0], geturl(x[0])[0]), windows_and_versions)
for id, version in windows_and_versions:
openurl('http://www.python.org/', windowid=id)
print 'Type return to revert to old contents-'
sys.stdin.readline()
for id, url in windows_and_urls:
openurl(url, id)
if __name__ == '__main__':
_test()