mirror of
https://github.com/python/cpython.git
synced 2025-07-26 20:54:39 +00:00
Initial revision
This commit is contained in:
Jack Jansen
parent
1d6a6ea1a8
commit
7cc5735ef2
24 changed files with 5316 additions and 0 deletions
301
Mac/Contrib/PythonScript/PythonScript.py
Normal file
301
Mac/Contrib/PythonScript/PythonScript.py
Normal file
|
|
@ -0,0 +1,301 @@
|
|||
"""
|
||||
Python script a module to comunicate with apple events
|
||||
|
||||
v 0.1a2
|
||||
v.0.2 16 april 1998
|
||||
|
||||
|
||||
"""
|
||||
import sys
|
||||
import getaete
|
||||
import baetools
|
||||
import baetypes
|
||||
import AE
|
||||
import AppleEvents
|
||||
import macfs
|
||||
from types import *
|
||||
#from aetypes import InstanceType
|
||||
from aepack import AEDescType
|
||||
|
||||
ordinal = {
|
||||
'every': 'all ',
|
||||
'first' : 'firs',
|
||||
'last' : 'last',
|
||||
'any' : 'any ',
|
||||
'middle' : 'midd'}
|
||||
|
||||
|
||||
Error = 'PythonScript.Error'
|
||||
|
||||
|
||||
class PsEvents:
|
||||
pass
|
||||
|
||||
|
||||
class PsClasses:
|
||||
|
||||
|
||||
def __getattr__(self, name):
|
||||
try:
|
||||
return DCItem(name, self)
|
||||
except:
|
||||
pass
|
||||
|
||||
def __repr__(self):
|
||||
if self.form != 'prop':
|
||||
t = type(self.seld)
|
||||
if t == StringType:
|
||||
self.form = 'name'
|
||||
elif baetypes.IsRange(self.seld):
|
||||
self.form = 'rang'
|
||||
elif baetypes.IsComparison(self.seld) or baetypes.IsLogical(self.seld):
|
||||
self.form = 'test'
|
||||
elif t == TupleType:
|
||||
# Breakout: specify both form and seld in a tuple
|
||||
# (if you want ID or rele or somesuch)
|
||||
self.form, self.seld = self.seld
|
||||
elif t == IntType:
|
||||
self.form = 'indx'
|
||||
else:
|
||||
pass
|
||||
|
||||
if self.seld in ordinal.keys():
|
||||
self.seld = baetypes.Ordinal(ordinal[self.seld])
|
||||
self.form = 'indx'
|
||||
|
||||
s = "baetypes.ObjectSpecifier(%s, %s, %s" % (`self.want`, `self.form`, `self.seld`)
|
||||
if `self.fr`:
|
||||
s = s + ", %s)" % `self.fr`
|
||||
else:
|
||||
s = s + ")"
|
||||
return s
|
||||
|
||||
def __str__(self):
|
||||
return self.want
|
||||
|
||||
|
||||
def template(self, seld=None, fr=None):
|
||||
self.seld = seld
|
||||
self.fr = fr
|
||||
|
||||
def template1(self, which, fr=None):
|
||||
self.want = 'prop'
|
||||
self.form = 'prop'
|
||||
self.fr = fr
|
||||
|
||||
class DCItem:
|
||||
def __init__(self, comp, fr):
|
||||
self.compclass = comp
|
||||
self.fr = fr
|
||||
|
||||
def __call__(self, which=None):
|
||||
if which:
|
||||
self.compclass = eval('PsClass.%s' % self.compclass)
|
||||
else:
|
||||
try:
|
||||
self.compclass = eval('PsProperties.%s' % self.compclass)
|
||||
except AttributeError:
|
||||
self.compclass = eval('PsClass.%s' % self.compclass)
|
||||
return self.compclass(which, self.fr)
|
||||
|
||||
class PsClass:
|
||||
pass
|
||||
|
||||
class PsProperties:
|
||||
pass
|
||||
|
||||
|
||||
class PsEnumerations:
|
||||
pass
|
||||
|
||||
|
||||
def PsScript(sig=None, Timeout=0, Ignoring=0):
|
||||
elements = {}
|
||||
if sig:
|
||||
target, sig = Signature(sig)
|
||||
pyscript = getaete.Getaete(sig)
|
||||
else:
|
||||
target, sig = Signature('Pyth')
|
||||
pyscript = getaete.Getaete()
|
||||
setattr(PyScript, 'timeout', Timeout)
|
||||
setattr(PyScript, 'ignoring', Ignoring)
|
||||
setattr(PyScript, 'target', target)
|
||||
for key, value in pyscript[0].items():
|
||||
setattr(PsEvents, key, value)
|
||||
for key, value in pyscript[1].items():
|
||||
CreateClass(key, 'PsClasses', value)
|
||||
for val in value[2]:
|
||||
CreateProperty(val[0], 'PsClasses', `val[1]`)
|
||||
|
||||
if value[3]:
|
||||
for val in value[3]:
|
||||
if val[0] not in elements.keys():
|
||||
elements[val[0]] = val[1]
|
||||
elif len(val[1]) > len(elements[val[0]]):
|
||||
elements[val[0]] = val[1]
|
||||
|
||||
for key, value in pyscript[2].items():
|
||||
for val in value:
|
||||
setattr(PsEnumerations, val[0], val[1])
|
||||
|
||||
def CreateClass(newClassName, superClassName, value):
|
||||
parentDict = PsClass.__dict__
|
||||
exec "class %s(%s): pass" % (newClassName, superClassName) in \
|
||||
globals(), parentDict
|
||||
newClassObj = parentDict[newClassName]
|
||||
newClassObj.__init__ = template
|
||||
exec "setattr(newClassObj, 'want', %s)" % `value[0]`
|
||||
if value[2] and value[2][0][0] == 'every':
|
||||
exec "setattr(newClassObj, 'plur', 1)"
|
||||
|
||||
def CreateProperty(newClassName, superClassName, value):
|
||||
parentDict = PsProperties.__dict__
|
||||
exec "class %s(%s): pass" % (newClassName, superClassName) in \
|
||||
globals(), parentDict
|
||||
newClassObj = parentDict[newClassName]
|
||||
if newClassName == 'Every':
|
||||
value = "baetypes.mkOrdinal('every')"
|
||||
newClassObj.__init__ = template1
|
||||
exec "setattr(newClassObj, 'seld', %s)" % value
|
||||
|
||||
def Signature(signature):
|
||||
if type(signature) == AEDescType:
|
||||
target = signature
|
||||
elif type(signature) == InstanceType and hasattr(signature, '__aepack__'):
|
||||
target = signature.__aepack__()
|
||||
elif type(signature) == StringType:
|
||||
if len(signature) == 4:
|
||||
target = AE.AECreateDesc(AppleEvents.typeApplSignature, signature)
|
||||
target_signature = signature
|
||||
else:
|
||||
#This should ready be made persistant, so PythonScript 'remembered' where applications were
|
||||
fss, ok = macfs.PromptGetFile('Find the aplication %s' % signature, 'APPL')
|
||||
if ok:
|
||||
target_signature = fss.GetCreatorType()[0]
|
||||
target = AE.AECreateDesc(AppleEvents.typeApplSignature, target_signature)
|
||||
else:
|
||||
raise TypeError, "signature should be 4-char string or AEDesc"
|
||||
return target, target_signature
|
||||
|
||||
|
||||
|
||||
|
||||
class PyScript(PsEvents):
|
||||
def __init__(self, name, obj=None, **args):
|
||||
desc, code, subcode, rply, message, keywds = name
|
||||
# print 'code', code
|
||||
# print 'subcode', subcode
|
||||
# print 'rply', rply
|
||||
# print 'message', message
|
||||
# print 'keywds', keywds
|
||||
# print 'name', name
|
||||
# print 'obj', obj
|
||||
# print 'args', args
|
||||
self.code = code
|
||||
self.subcode = subcode
|
||||
self.attributes ={}
|
||||
self.arguments = {}
|
||||
if keywds:
|
||||
self.arguments = self.keyargs(keywds, args)
|
||||
self.arguments['----'] = self.keyfms(message[0], obj)
|
||||
|
||||
##XXXX Eudora needs this XXXX##
|
||||
if self.arguments['----'] == None:
|
||||
del self.arguments['----']
|
||||
# print 'arguments', self.arguments
|
||||
if self.ignoring or rply[0] == 'null':
|
||||
self.send_flags = AppleEvents.kAENoReply
|
||||
else:
|
||||
self.send_flags = AppleEvents.kAEWaitReply
|
||||
self.send_priority = AppleEvents.kAENormalPriority
|
||||
if self.timeout:
|
||||
self.send_timeout = self.timeout
|
||||
else:
|
||||
self.send_timeout = AppleEvents.kAEDefaultTimeout
|
||||
|
||||
|
||||
def keyargs(self, ats, args):
|
||||
# print 'keyargs', ats, args
|
||||
output = {}
|
||||
for arg in args.keys():
|
||||
for at in ats:
|
||||
if at[0] == arg:
|
||||
output[at[1]] = self.keyfms(at[2][0], args[arg])
|
||||
return output
|
||||
|
||||
def keyfms(self, key, value):
|
||||
# print 'keyfms', 'key', key, `value`
|
||||
if key == 'obj ' or key == 'insl':
|
||||
return eval(`value`)
|
||||
elif key == 'TEXT':
|
||||
return value
|
||||
elif key == 'null':
|
||||
return
|
||||
elif key == 'bool':
|
||||
return baetypes.mkboolean(value)
|
||||
elif key == 'type':
|
||||
try:
|
||||
val = eval('PsClass.%s()' % value)
|
||||
return baetypes.mktype(str(val))
|
||||
except:
|
||||
return baetypes.mktype(value)
|
||||
else:
|
||||
print "I don't know what to put here -- script.keyargs"
|
||||
print key, `value`
|
||||
sys.exit[1]
|
||||
|
||||
def newevent(self, code, subcode, parameters = {}, attributes = {}):
|
||||
"""Create a complete structure for an apple event"""
|
||||
# print code, subcode, parameters, attributes
|
||||
event = AE.AECreateAppleEvent(code, subcode, self.target,
|
||||
AppleEvents.kAutoGenerateReturnID, AppleEvents.kAnyTransactionID)
|
||||
baetools.packevent(event, parameters, attributes)
|
||||
return event
|
||||
|
||||
def sendevent(self, event):
|
||||
"""Send a pre-created appleevent, await the reply and unpack it"""
|
||||
|
||||
reply = event.AESend(self.send_flags, self.send_priority,
|
||||
self.send_timeout)
|
||||
parameters, attributes = baetools.unpackevent(reply)
|
||||
return reply, parameters, attributes
|
||||
|
||||
def send(self, code, subcode, parameters = {}, attributes = {}):
|
||||
"""Send an appleevent given code/subcode/pars/attrs and unpack the reply"""
|
||||
# print code, subcode, parameters, attributes
|
||||
return self.sendevent(self.newevent(code, subcode, parameters, attributes))
|
||||
|
||||
def __str__(self):
|
||||
_reply, _arguments, _attributes = self.send(self.code, self.subcode, self.arguments, self.attributes)
|
||||
|
||||
if _arguments.has_key('errn'):
|
||||
raise baetools.Error, baetools.decodeerror(_arguments)
|
||||
# XXXX Optionally decode result
|
||||
if _arguments.has_key('----'):
|
||||
return str(_arguments['----'])
|
||||
else:
|
||||
return
|
||||
|
||||
|
||||
|
||||
def test():
|
||||
Simp = 'Hermit:Applications:SimpleText'
|
||||
PsScript('MACS', Timeout=60*60*3)
|
||||
# PsScript('CSOm', Timeout=60*60*3)
|
||||
# PsScript('', Timeout=60*60*3)
|
||||
# PyScript('macsoup')
|
||||
ev = PsEvents
|
||||
ps = PsClass
|
||||
# print PsProperties.__dict__
|
||||
# y = script(ev.Open, File('Hermit:Desktop Folder:Lincolnshire Imp'), using=Application_file(Simp))
|
||||
# print baetypes.NProperty('prop', 'prop', 'pnam', baetypes.ObjectSpecifier('cdis', 'indx', 1, None))
|
||||
# y = PyScript(ev.Get, Disk("Hermit").Folder(7).File(1).Name())
|
||||
# y = PyScript(ev.Get, Disk("Hermit").Size(), As='Integer')
|
||||
# y = PyScript(ev.Get, ps.Desktopobject(1).Startup_disk())
|
||||
# y = PyScript(ev.Get, Mailbox(1).File(), as='TEXT')
|
||||
# print 'y', y, type(y)
|
||||
|
||||
if __name__ == '__main__':
|
||||
test()
|
||||
# sys.exit(1)
|
||||
|
||||
Loading…
Add table
Add a link
Reference in a new issue