StandardFile compatability routines. For the time being calling macfsn._install()

will install these in macfs (if Navigation is available).

diff --git a/Mac/Lib/macfsn.py b/Mac/Lib/macfsn.py
new file mode 100644 (file)
index 0000000..dcff677
--- /dev/null
+++ b/Mac/Lib/macfsn.py
@@ -0,0 +1,130 @@
+"""StandardFile compatability module: implement macfs StandardFile
+API calls with Navigation Services"""
+import macfs
+import struct
+import Res
+try:
+       import Nav
+except ImportError:
+       Nav = None
+
+_curfolder = None
+_movablemodal = 1
+
+def _mktypelist(typelist):
+       if not typelist:
+               return None
+       data = 'Pyth' + struct.pack("hh", 0, len(typelist))
+       for type in typelist:
+               data = data+type
+       return Res.Resource(data)
+       
+def _StandardGetFile(*typelist):
+       return apply(_PromptGetFile, (None,)+typelist)
+       
+def _PromptGetFile(prompt, *typelist):
+       args = {}
+       flags = 0x56
+       typehandle = _mktypelist(typelist)
+       if typehandle:
+               args['typeList'] = typehandle
+       else:
+               flags = flags | 0x01
+       if prompt:
+               args['message'] = prompt
+       args['preferenceKey'] = 'PyMC'
+       if _movablemodal:
+               args['eventProc'] = None
+       try:
+               rr = Nav.NavChooseFile(args)
+               good = 1
+       except Nav.error, arg:
+               good = 0
+               fss = macfs.FSSpec(':cancelled')
+       else:
+               fss = rr.selection[0]
+##     if typehandle:
+##             typehandle.DisposeHandle()
+       return fss, good
+
+def _StandardPutFile(prompt, default=None):
+       args = {}
+       flags = 0x57
+       if prompt:
+               args['message'] = prompt
+       args['preferenceKey'] = 'PyMC'
+       if _movablemodal:
+               args['eventProc'] = None
+       try:
+               rr = Nav.NavPutFile(args)
+               good = 1
+       except Nav.error, arg:
+               good = 0
+               fss = macfs.FSSpec(':cancelled')
+       else:
+               fss = rr.selection[0]
+       return fss, good
+       
+def _SetFolder(folder):
+       global _curfolder
+       if _curfolder:
+               rv = _curfolder
+       else:
+               _curfolder = macfs.FSSpec(":")
+       _curfolder = macfs.FSSpec(folder)
+       return rv
+       
+def _GetDirectory(prompt=None):
+       args = {}
+       flags = 0x57
+       if prompt:
+               args['message'] = prompt
+       args['preferenceKey'] = 'PyMC'
+       if _movablemodal:
+               args['eventProc'] = None
+       try:
+               rr = Nav.NavChooseFolder(args)
+               good = 1
+       except Nav.error, arg:
+               good = 0
+               fss = macfs.FSSpec(':cancelled')
+       else:
+               fss = rr.selection[0]
+       return fss, good
+       
+def _install():
+       macfs.StandardGetFile = StandardGetFile
+       macfs.PromptGetFile = PromptGetFile
+       macfs.StandardPutFile = StandardPutFile
+       macfs.SetFolder = SetFolder
+       macfs.GetDirectory = GetDirectory
+       
+if Nav and Nav.NavServicesAvailable():
+       StandardGetFile = _StandardGetFile
+       PromptGetFile = _PromptGetFile
+       StandardPutFile = _StandardPutFile
+       SetFolder = _SetFolder
+       GetDirectory = _GetDirectory
+else:
+       from macfs import StandardGetFile, PromptGetFile, StandardPutFile, SetFolder, GetDirectory
+       
+
+if __name__ == '__main__':
+       print 'Testing StandardGetFile'
+       fss, ok = StandardGetFile()
+       print '->', fss, ok
+       print 'Testing StandardGetFile("TEXT")'
+       fss, ok = StandardGetFile("TEXT")
+       print '->', fss, ok
+       print 'Testing PromptGetFile'
+       fss, ok = PromptGetFile("prompt")
+       print '->', fss, ok
+       print 'Testing StandardPutFile("the prompt", "default")'
+       fss, ok = StandardPutFile("the prompt", "default")
+       print '->', fss, ok
+       print 'Testing GetDirectory("another prompt")'
+       fss, ok = GetDirectory("Another prompt")
+       print '->', fss, ok
+       import sys
+       sys.exit(1)
+