1996-09-08 22:46:11 -03:00
|
|
|
"""MiniAEFrame - A first stab at an AE Application framework.
|
|
|
|
This framework is still work-in-progress, so do not rely on it remaining
|
|
|
|
unchanged.
|
|
|
|
"""
|
|
|
|
|
|
|
|
import sys
|
|
|
|
import traceback
|
|
|
|
import MacOS
|
|
|
|
import AE
|
|
|
|
from AppleEvents import *
|
|
|
|
import Evt
|
|
|
|
from Events import *
|
|
|
|
import Menu
|
|
|
|
import Win
|
|
|
|
from Windows import *
|
|
|
|
import Qd
|
|
|
|
|
|
|
|
import aetools
|
|
|
|
import EasyDialogs
|
|
|
|
|
|
|
|
kHighLevelEvent = 23 # Not defined anywhere for Python yet?
|
|
|
|
|
|
|
|
class MiniApplication:
|
|
|
|
"""A minimal FrameWork.Application-like class"""
|
|
|
|
|
|
|
|
def __init__(self):
|
|
|
|
self.quitting = 0
|
|
|
|
# Initialize menu
|
|
|
|
self.appleid = 1
|
|
|
|
self.quitid = 2
|
|
|
|
Menu.ClearMenuBar()
|
|
|
|
self.applemenu = applemenu = Menu.NewMenu(self.appleid, "\024")
|
|
|
|
applemenu.AppendMenu("All about cgitest...;(-")
|
|
|
|
applemenu.AppendResMenu('DRVR')
|
|
|
|
applemenu.InsertMenu(0)
|
|
|
|
self.quitmenu = Menu.NewMenu(self.quitid, "File")
|
|
|
|
self.quitmenu.AppendMenu("Quit")
|
|
|
|
self.quitmenu.InsertMenu(0)
|
|
|
|
Menu.DrawMenuBar()
|
|
|
|
|
|
|
|
def __del__(self):
|
|
|
|
self.close()
|
|
|
|
|
|
|
|
def close(self):
|
|
|
|
pass
|
|
|
|
|
|
|
|
def mainloop(self, mask = everyEvent, timeout = 60*60):
|
|
|
|
while not self.quitting:
|
|
|
|
self.dooneevent(mask, timeout)
|
1996-09-17 09:36:35 -03:00
|
|
|
|
|
|
|
def _quit(self):
|
|
|
|
self.quitting = 1
|
1996-09-08 22:46:11 -03:00
|
|
|
|
|
|
|
def dooneevent(self, mask = everyEvent, timeout = 60*60):
|
|
|
|
got, event = Evt.WaitNextEvent(mask, timeout)
|
|
|
|
if got:
|
|
|
|
self.lowlevelhandler(event)
|
|
|
|
|
|
|
|
def lowlevelhandler(self, event):
|
|
|
|
what, message, when, where, modifiers = event
|
|
|
|
h, v = where
|
|
|
|
if what == kHighLevelEvent:
|
|
|
|
msg = "High Level Event: %s %s" % \
|
|
|
|
(`code(message)`, `code(h | (v<<16))`)
|
|
|
|
try:
|
|
|
|
AE.AEProcessAppleEvent(event)
|
|
|
|
except AE.Error, err:
|
|
|
|
print 'AE error: ', err
|
|
|
|
print 'in', msg
|
|
|
|
traceback.print_exc()
|
|
|
|
return
|
|
|
|
elif what == keyDown:
|
|
|
|
c = chr(message & charCodeMask)
|
|
|
|
if c == '.' and modifiers & cmdKey:
|
|
|
|
raise KeyboardInterrupt, "Command-period"
|
|
|
|
elif what == mouseDown:
|
|
|
|
partcode, window = Win.FindWindow(where)
|
|
|
|
if partcode == inMenuBar:
|
|
|
|
result = Menu.MenuSelect(where)
|
|
|
|
id = (result>>16) & 0xffff # Hi word
|
|
|
|
item = result & 0xffff # Lo word
|
|
|
|
if id == self.appleid:
|
|
|
|
if item == 1:
|
|
|
|
EasyDialogs.Message("cgitest - First cgi test")
|
|
|
|
return
|
|
|
|
elif item > 1:
|
|
|
|
name = self.applemenu.GetItem(item)
|
|
|
|
Qd.OpenDeskAcc(name)
|
|
|
|
return
|
|
|
|
if id == self.quitid and item == 1:
|
|
|
|
print "Menu-requested QUIT"
|
|
|
|
self.quitting = 1
|
|
|
|
# Anything not handled is passed to Python/SIOUX
|
|
|
|
MacOS.HandleEvent(event)
|
|
|
|
|
|
|
|
class AEServer:
|
|
|
|
|
|
|
|
def __init__(self):
|
|
|
|
self.ae_handlers = {}
|
|
|
|
|
|
|
|
def installaehandler(self, classe, type, callback):
|
|
|
|
AE.AEInstallEventHandler(classe, type, self.callback_wrapper)
|
|
|
|
self.ae_handlers[(classe, type)] = callback
|
|
|
|
|
|
|
|
def close(self):
|
|
|
|
for classe, type in self.ae_handlers.keys():
|
|
|
|
AE.AERemoveEventHandler(classe, type)
|
|
|
|
|
|
|
|
def callback_wrapper(self, _request, _reply):
|
|
|
|
_parameters, _attributes = aetools.unpackevent(_request)
|
|
|
|
_class = _attributes['evcl'].type
|
|
|
|
_type = _attributes['evid'].type
|
|
|
|
|
|
|
|
if self.ae_handlers.has_key((_class, _type)):
|
|
|
|
_function = self.ae_handlers[(_class, _type)]
|
|
|
|
elif self.ae_handlers.has_key((_class, '****')):
|
|
|
|
_function = self.ae_handlers[(_class, '****')]
|
|
|
|
elif self.ae_handlers.has_key(('****', '****')):
|
|
|
|
_function = self.ae_handlers[('****', '****')]
|
|
|
|
else:
|
|
|
|
raise 'Cannot happen: AE callback without handler', (_class, _type)
|
|
|
|
|
|
|
|
# XXXX Do key-to-name mapping here
|
|
|
|
|
|
|
|
_parameters['_attributes'] = _attributes
|
|
|
|
_parameters['_class'] = _class
|
|
|
|
_parameters['_type'] = _type
|
|
|
|
if _parameters.has_key('----'):
|
|
|
|
_object = _parameters['----']
|
|
|
|
del _parameters['----']
|
1996-10-23 12:43:04 -03:00
|
|
|
print 'XXX', (_function, (_object,), _parameters)
|
|
|
|
try:
|
|
|
|
rv = apply(_function, (_object,), _parameters)
|
|
|
|
except TypeError, name:
|
|
|
|
raise TypeError, ('AppleEvent handler misses formal keyword argument', _function, name)
|
1996-09-08 22:46:11 -03:00
|
|
|
else:
|
1996-10-23 12:43:04 -03:00
|
|
|
try:
|
|
|
|
rv = apply(_function, (), _parameters)
|
|
|
|
except TypeError, name:
|
|
|
|
raise TypeError, ('AppleEvent handler misses formal keyword argument', _function, name)
|
1996-09-08 22:46:11 -03:00
|
|
|
|
|
|
|
if rv == None:
|
|
|
|
aetools.packevent(_reply, {})
|
|
|
|
else:
|
|
|
|
aetools.packevent(_reply, {'----':rv})
|
|
|
|
|
|
|
|
def code(x):
|
|
|
|
"Convert a long int to the 4-character code it really is"
|
|
|
|
s = ''
|
|
|
|
for i in range(4):
|
|
|
|
x, c = divmod(x, 256)
|
|
|
|
s = chr(c) + s
|
|
|
|
return s
|
|
|
|
|
|
|
|
class _Test(AEServer, MiniApplication):
|
|
|
|
"""Mini test application, handles required events"""
|
|
|
|
|
|
|
|
def __init__(self):
|
|
|
|
MiniApplication.__init__(self)
|
|
|
|
AEServer.__init__(self)
|
|
|
|
self.installaehandler('aevt', 'oapp', self.open_app)
|
|
|
|
self.installaehandler('aevt', 'quit', self.quit)
|
|
|
|
self.installaehandler('aevt', '****', self.other)
|
|
|
|
self.mainloop()
|
|
|
|
|
|
|
|
def quit(self, **args):
|
1996-09-17 09:36:35 -03:00
|
|
|
self._quit()
|
1996-09-08 22:46:11 -03:00
|
|
|
|
|
|
|
def open_app(self, **args):
|
|
|
|
pass
|
|
|
|
|
|
|
|
def other(self, _object=None, _class=None, _type=None, **args):
|
|
|
|
print 'AppleEvent', (_class, _type), 'for', _object, 'Other args:', args
|
|
|
|
|
|
|
|
if __name__ == '__main__':
|
|
|
|
_Test()
|