Initial minimal test program: print information on anything dropped onto Python
window.
diff --git a/Mac/Lib/test/dragtest.py b/Mac/Lib/test/dragtest.py
new file mode 100644
index 0000000..7663af7
--- /dev/null
+++ b/Mac/Lib/test/dragtest.py
@@ -0,0 +1,43 @@
+import Drag
+import time
+xxxx=1
+def decode_hfs(data):
+ import struct, macfs
+ tp = data[0:4]
+ cr = data[4:8]
+ flags = struct.unpack("h", data[8:10])
+ fss = macfs.RawFSSpec(data[10:])
+ return tp, cr, flags, fss
+
+def tracker(msg, dragref, window):
+ pass
+
+def dropper(dragref, window):
+ global xxxx
+ n = dragref.CountDragItems()
+ print 'Drop %d items:'%n
+ for i in range(1, n+1):
+ refnum = dragref.GetDragItemReferenceNumber(i)
+ print '%d (ItemReference 0x%x)'%(i, refnum)
+ nf = dragref.CountDragItemFlavors(refnum)
+ print ' %d flavors:'%nf
+ for j in range(1, nf+1):
+ ftype = dragref.GetFlavorType(refnum, j)
+ fflags = dragref.GetFlavorFlags(refnum, ftype)
+ print ' "%4.4s" 0x%x'%(ftype, fflags)
+ if ftype == 'hfs ':
+ datasize = dragref.GetFlavorDataSize(refnum, ftype)
+ data = dragref.GetFlavorData(refnum, ftype, datasize, 0)
+ print ' datasize', `data`
+ xxxx = data
+ print ' ->', decode_hfs(data)
+
+
+def main():
+ print "Drag things onto output window. Press command-. to quit."
+ Drag.InstallTrackingHandler(tracker)
+ Drag.InstallReceiveHandler(dropper)
+ while 1:
+ time.sleep(100)
+
+main()