]> granicus.if.org Git - python/commitdiff
These stopped working a long time ago, and they're not worth fixing.
authorJack Jansen <jack.jansen@cwi.nl>
Fri, 3 Aug 2001 14:10:27 +0000 (14:10 +0000)
committerJack Jansen <jack.jansen@cwi.nl>
Fri, 3 Aug 2001 14:10:27 +0000 (14:10 +0000)
Mac/Lib/test/tae.py [deleted file]
Mac/Lib/test/tctl.py [deleted file]

diff --git a/Mac/Lib/test/tae.py b/Mac/Lib/test/tae.py
deleted file mode 100644 (file)
index 4789672..0000000
+++ /dev/null
@@ -1,112 +0,0 @@
-# The oldest AppleEvent test program.
-# Its function has been overtaken by echo.py and tell.py.
-
-import AE
-from AppleEvents import *
-import Evt
-from Events import *
-import struct
-import aetools
-import macfs
-import sys
-import MacOS
-
-MacOS.SchedParams(1, 0)
-
-def aehandler(request, reply):
-       tosend = []
-       print 'request:', aetools.unpackevent(request)
-       param = request.AEGetParamDesc(keyDirectObject, typeWildCard)
-       if param.type == typeAEList:
-               n = param.AECountItems()
-               print 'List has', n, 'items'
-               for i in range(1, 1+n):
-                       type, item = param.AEGetNthDesc(i, typeFSS)
-                       data = item.data
-                       print 'item', i, ':', type, item.type, len(data), 'bytes'
-                       vol, dir, fnlen = struct.unpack('hlb', data[:7])
-                       filename = data[7:7+fnlen]
-                       print 'vol:', vol, '; dir:', dir, '; filename:', `filename`
-                       print 'full path:', macfs.FSSpec((vol,dir,filename)).as_pathname()
-                       tosend.append(item)
-       else:
-               pass
-               print 'param:', (param.type, param.data[:20]), param.data[20:] and '...'
-       if tosend:
-               passtothink(tosend)
-
-
-def passtothink(list):
-       target = AE.AECreateDesc(typeApplSignature, 'KAHL')
-       event = AE.AECreateAppleEvent(kCoreEventClass,
-                                     kAEOpenDocuments,
-                                     target,
-                                     kAutoGenerateReturnID,
-                                     kAnyTransactionID)
-       aetools.packevent(event, {keyDirectObject: list})
-       reply = event.AESend(kAENoReply | kAEAlwaysInteract | kAECanSwitchLayer,
-                            kAENormalPriority,
-                            kAEDefaultTimeout)
-       #print "Reply:", aetools.unpackevent(reply)
-       return
-       event = AE.AECreateAppleEvent(kCoreEventClass,
-                                     kAEOpenApplication,
-                                     target,
-                                     kAutoGenerateReturnID,
-                                     kAnyTransactionID)
-       reply = event.AESend(kAENoReply | kAEAlwaysInteract | kAECanSwitchLayer,
-                            kAENormalPriority,
-                            kAEDefaultTimeout)
-
-def unihandler(req, rep):
-       print 'unihandler'
-       aehandler(req, rep)
-
-quit = 0
-def quithandler(req, rep):
-       global quit
-       quit = 1
-
-def corehandler(req, rep):
-       print 'core event!'
-       parameters, attributes = aetools.unpackevent(req)
-       print "event class =", attributes['evcl']
-       print "event id =", attributes['evid']
-       print 'parameters:', parameters
-       # echo the arguments, to see how Script Editor formats them
-       aetools.packevent(rep, parameters)
-
-def wildhandler(req, rep):
-       print 'wildcard event!'
-       parameters, attributes = aetools.unpackevent(req)
-       print "event class =", attributes['evcl']
-       print "event id =", attributes['evid']
-       print 'parameters:', parameters
-
-AE.AEInstallEventHandler(typeAppleEvent, kAEOpenApplication, aehandler)
-AE.AEInstallEventHandler(typeAppleEvent, kAEOpenDocuments, aehandler)
-AE.AEInstallEventHandler(typeAppleEvent, kAEPrintDocuments, aehandler)
-AE.AEInstallEventHandler(typeAppleEvent, kAEQuitApplication, quithandler)
-AE.AEInstallEventHandler(typeAppleEvent, typeWildCard, unihandler)
-AE.AEInstallEventHandler('core', typeWildCard, corehandler)
-#AE.AEInstallEventHandler(typeWildCard, typeWildCard, wildhandler)
-
-
-def main():
-       global quit
-       quit = 0
-       while not quit:
-               ok, e = Evt.WaitNextEvent(-1, 60)
-               if ok:
-                       print 'Event:', e
-                       if e[0] == 23: # kHighLevelEvent
-                               AE.AEProcessAppleEvent(e)
-                       elif e[0] == keyDown and chr(e[1]&0xff) == '.' and e[4]&cmdKey:
-                               raise KeyboardInterrupt, "Command-Period"
-                       else:
-                               MacOS.HandleEvent(e)
-
-if __name__ == '__main__':
-       main()
-
-print "This module is obsolete -- use echo.py or tell.py ..."
diff --git a/Mac/Lib/test/tctl.py b/Mac/Lib/test/tctl.py
deleted file mode 100644 (file)
index a255c56..0000000
+++ /dev/null
@@ -1,20 +0,0 @@
-# play with controls
-
-from Dlg import *
-from Ctl import *
-from Win import *
-from Evt import *
-import time
-import sys
-
-def main():
-       r = (40, 40, 400, 300)
-       w = NewWindow(r, "The Spanish Inquisition", 1, 0, -1, 1, 0x55555555)
-       w.DrawGrowIcon()
-       r = (40, 40, 100, 60)
-       c = NewControl(w, r, "SPAM!", 1, 0, 0, 1, 0, 0)
-       print 'Ok, try it...'
-       sys.exit(1)  # So we can see what happens...
-
-
-main()