home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 7 / Apprentice-Release7.iso / Source Code / C / Applications / Python 1.4 / Python 1.4 source / Mac / Modules / win / winsupport.py < prev   
Encoding:
Text File  |  1996-09-23  |  4.1 KB  |  133 lines  |  [TEXT/Pyth]
  1. # This script generates a Python interface for an Apple Macintosh Manager.
  2. # It uses the "bgen" package to generate C code.
  3. # The function specifications are generated by scanning the mamager's header file,
  4. # using the "scantools" package (customized for this particular manager).
  5.  
  6. import string
  7.  
  8. import addpack
  9. addpack.addpack(':Tools:bgen:bgen')
  10.  
  11. # Declarations that change for each manager
  12. MACHEADERFILE = 'Windows.h'        # The Apple header file
  13. MODNAME = 'Win'                # The name of the module
  14. OBJECTNAME = 'Window'            # The basic name of the objects used here
  15.  
  16. # The following is *usually* unchanged but may still require tuning
  17. MODPREFIX = MODNAME            # The prefix for module-wide routines
  18. OBJECTTYPE = OBJECTNAME + 'Ptr'        # The C type used to represent them
  19. OBJECTPREFIX = MODPREFIX + 'Obj'    # The prefix for object methods
  20. INPUTFILE = string.lower(MODPREFIX) + 'gen.py' # The file generated by the scanner
  21. EDITFILE = string.lower(MODPREFIX) + 'edit.py' # The manual definitions
  22. OUTPUTFILE = MODNAME + "module.c"    # The file generated by this program
  23.  
  24. from macsupport import *
  25.  
  26. # Create the type objects
  27.  
  28. WindowPtr = OpaqueByValueType(OBJECTTYPE, OBJECTPREFIX)
  29. WindowRef = WindowPtr
  30. WindowPeek = OpaqueByValueType("WindowPeek", OBJECTPREFIX)
  31. WindowPeek.passInput = lambda name: "(WindowPeek)(%s)" % name
  32. CGrafPtr = OpaqueByValueType("CGrafPtr", "GrafObj")
  33. GrafPtr = OpaqueByValueType("GrafPtr", "GrafObj")
  34.  
  35. RgnHandle = OpaqueByValueType("RgnHandle", "ResObj")
  36. PicHandle = OpaqueByValueType("PicHandle", "ResObj")
  37.  
  38. includestuff = includestuff + """
  39. #include <%s>""" % MACHEADERFILE + """
  40.  
  41. #define resNotFound -192 /* Can't include <Errors.h> because of Python's "errors.h" */
  42.  
  43. #ifdef HAVE_UNIVERSAL_HEADERS
  44. #define WindowPeek WindowPtr
  45. #endif
  46. """
  47.  
  48. finalstuff = finalstuff + """
  49. /* Return the object corresponding to the window, or NULL */
  50.  
  51. PyObject *
  52. WinObj_WhichWindow(w)
  53.     WindowPtr w;
  54. {
  55.     PyObject *it;
  56.     
  57.     /* XXX What if we find a stdwin window or a window belonging
  58.            to some other package? */
  59.     if (w == NULL)
  60.         it = NULL;
  61.     else
  62.         it = (PyObject *) GetWRefCon(w);
  63.     if (it == NULL || ((WindowObject *)it)->ob_itself != w)
  64.         it = Py_None;
  65.     Py_INCREF(it);
  66.     return it;
  67. }
  68. """
  69.  
  70. class MyObjectDefinition(GlobalObjectDefinition):
  71.     def outputCheckNewArg(self):
  72.         Output("if (itself == NULL) return PyMac_Error(resNotFound);")
  73.     def outputInitStructMembers(self):
  74.         GlobalObjectDefinition.outputInitStructMembers(self)
  75.         Output("SetWRefCon(itself, (long)it);")
  76.     def outputCheckConvertArg(self):
  77.         OutLbrace("if (DlgObj_Check(v))")
  78.         Output("*p_itself = ((WindowObject *)v)->ob_itself;")
  79.         Output("return 1;")
  80.         OutRbrace()
  81.         Out("""
  82.         if (v == Py_None) { *p_itself = NULL; return 1; }
  83.         if (PyInt_Check(v)) { *p_itself = (WindowPtr)PyInt_AsLong(v); return 1; }
  84.         """)
  85.     def outputFreeIt(self, itselfname):
  86.         Output("DisposeWindow(%s);", itselfname)
  87. # From here on it's basically all boiler plate...
  88.  
  89. # Create the generator groups and link them
  90. module = MacModule(MODNAME, MODPREFIX, includestuff, finalstuff, initstuff)
  91. object = MyObjectDefinition(OBJECTNAME, OBJECTPREFIX, OBJECTTYPE)
  92. module.addobject(object)
  93.  
  94. # Create the generator classes used to populate the lists
  95. Function = OSErrFunctionGenerator
  96. Method = OSErrMethodGenerator
  97.  
  98. # Create and populate the lists
  99. functions = []
  100. methods = []
  101. execfile(INPUTFILE)
  102.  
  103. # Add manual routines for converting integer WindowPtr's (as returned by
  104. # various event routines)  and Dialog objects to a WindowObject.
  105. whichwin_body = """
  106. long ptr;
  107.  
  108. if ( !PyArg_ParseTuple(_args, "i", &ptr) )
  109.     return NULL;
  110. return WinObj_WhichWindow((WindowPtr)ptr);
  111. """
  112.  
  113. f = ManualGenerator("WhichWindow", whichwin_body)
  114. f.docstring = lambda : "Resolve an integer WindowPtr address to a Window object"
  115.  
  116. functions.append(f)
  117.  
  118. # And add the routines that access the internal bits of a window struct. They
  119. # are currently #defined in Windows.h, they will be real routines in Copland
  120. # (at which time this execfile can go)
  121. execfile(EDITFILE)
  122.  
  123. # add the populated lists to the generator groups
  124. # (in a different wordl the scan program would generate this)
  125. for f in functions: module.add(f)
  126. for f in methods: object.add(f)
  127.  
  128.  
  129.  
  130. # generate output (open the output file as late as possible)
  131. SetOutputFileName(OUTPUTFILE)
  132. module.generate()
  133.