Mac/Modules/ibcarbon/_IBCarbon.c

   1
   2 /* ======================== Module _IBCarbon ======================== */
   3
   4 #include "Python.h"
   5
   6
   7
   8 #ifdef WITHOUT_FRAMEWORKS
   9 #include <IBCarbonRuntime.h>
  10 #else
  11 #include <Carbon/Carbon.h>
  12 #endif /* WITHOUT_FRAMEWORKS */
  13 #include "macglue.h"
  14
  15 #ifdef USE_TOOLBOX_OBJECT_GLUE
  16 extern int _CFStringRefObj_Convert(PyObject *, CFStringRef *);
  17 //#define CFStringRefObj_Convert _CFStringRefObj_Convert
  18 #endif
  19
  20 //extern int CFBundleRefObj_Convert(PyObject *, CFBundleRef *);  // need to wrap CFBundle
  21
  22
  23 static PyObject *IBCarbon_Error;
  24
  25 /* ---------------------- Object type IBNibRef ---------------------- */
  26
  27 PyTypeObject IBNibRef_Type;
  28
  29 #define IBNibRefObj_Check(x) ((x)->ob_type == &IBNibRef_Type || PyObject_TypeCheck((x), &IBNibRef_Type))
  30
  31 typedef struct IBNibRefObject {
  32         PyObject_HEAD
  33         IBNibRef ob_itself;
  34 } IBNibRefObject;
  35
  36 PyObject *IBNibRefObj_New(IBNibRef itself)
  37 {
  38         IBNibRefObject *it;
  39         it = PyObject_NEW(IBNibRefObject, &IBNibRef_Type);
  40         if (it == NULL) return NULL;
  41         it->ob_itself = itself;
  42         return (PyObject *)it;
  43 }
  44 int IBNibRefObj_Convert(PyObject *v, IBNibRef *p_itself)
  45 {
  46         if (!IBNibRefObj_Check(v))
  47         {
  48                 PyErr_SetString(PyExc_TypeError, "IBNibRef required");
  49                 return 0;
  50         }
  51         *p_itself = ((IBNibRefObject *)v)->ob_itself;
  52         return 1;
  53 }
  54
  55 static void IBNibRefObj_dealloc(IBNibRefObject *self)
  56 {
  57         DisposeNibReference(self->ob_itself);
  58         self->ob_type->tp_free((PyObject *)self);
  59 }
  60
  61 static PyObject *IBNibRefObj_CreateWindowFromNib(IBNibRefObject *_self, PyObject *_args)
  62 {
  63         PyObject *_res = NULL;
  64         OSStatus _err;
  65         CFStringRef inName;
  66         WindowPtr outWindow;
  67         if (!PyArg_ParseTuple(_args, "O&",
  68                               CFStringRefObj_Convert, &inName))
  69                 return NULL;
  70         _err = CreateWindowFromNib(_self->ob_itself,
  71                                    inName,
  72                                    &outWindow);
  73         if (_err != noErr) return PyMac_Error(_err);
  74         _res = Py_BuildValue("O&",
  75                              WinObj_New, outWindow);
  76         return _res;
  77 }
  78
  79 static PyObject *IBNibRefObj_CreateMenuFromNib(IBNibRefObject *_self, PyObject *_args)
  80 {
  81         PyObject *_res = NULL;
  82         OSStatus _err;
  83         CFStringRef inName;
  84         MenuHandle outMenuRef;
  85         if (!PyArg_ParseTuple(_args, "O&",
  86                               CFStringRefObj_Convert, &inName))
  87                 return NULL;
  88         _err = CreateMenuFromNib(_self->ob_itself,
  89                                  inName,
  90                                  &outMenuRef);
  91         if (_err != noErr) return PyMac_Error(_err);
  92         _res = Py_BuildValue("O&",
  93                              MenuObj_New, outMenuRef);
  94         return _res;
  95 }
  96
  97 static PyObject *IBNibRefObj_CreateMenuBarFromNib(IBNibRefObject *_self, PyObject *_args)
  98 {
  99         PyObject *_res = NULL;
 100         OSStatus _err;
 101         CFStringRef inName;
 102         Handle outMenuBar;
 103         if (!PyArg_ParseTuple(_args, "O&",
 104                               CFStringRefObj_Convert, &inName))
 105                 return NULL;
 106         _err = CreateMenuBarFromNib(_self->ob_itself,
 107                                     inName,
 108                                     &outMenuBar);
 109         if (_err != noErr) return PyMac_Error(_err);
 110         _res = Py_BuildValue("O&",
 111                              ResObj_New, outMenuBar);
 112         return _res;
 113 }
 114
 115 static PyObject *IBNibRefObj_SetMenuBarFromNib(IBNibRefObject *_self, PyObject *_args)
 116 {
 117         PyObject *_res = NULL;
 118         OSStatus _err;
 119         CFStringRef inName;
 120         if (!PyArg_ParseTuple(_args, "O&",
 121                               CFStringRefObj_Convert, &inName))
 122                 return NULL;
 123         _err = SetMenuBarFromNib(_self->ob_itself,
 124                                  inName);
 125         if (_err != noErr) return PyMac_Error(_err);
 126         Py_INCREF(Py_None);
 127         _res = Py_None;
 128         return _res;
 129 }
 130
 131 static PyMethodDef IBNibRefObj_methods[] = {
 132         {"CreateWindowFromNib", (PyCFunction)IBNibRefObj_CreateWindowFromNib, 1,
 133          PyDoc_STR("(CFStringRef inName) -> (WindowPtr outWindow)")},
 134         {"CreateMenuFromNib", (PyCFunction)IBNibRefObj_CreateMenuFromNib, 1,
 135          PyDoc_STR("(CFStringRef inName) -> (MenuHandle outMenuRef)")},
 136         {"CreateMenuBarFromNib", (PyCFunction)IBNibRefObj_CreateMenuBarFromNib, 1,
 137          PyDoc_STR("(CFStringRef inName) -> (Handle outMenuBar)")},
 138         {"SetMenuBarFromNib", (PyCFunction)IBNibRefObj_SetMenuBarFromNib, 1,
 139          PyDoc_STR("(CFStringRef inName) -> None")},
 140         {NULL, NULL, 0}
 141 };
 142
 143 #define IBNibRefObj_getsetlist NULL
 144
 145
 146 #define IBNibRefObj_compare NULL
 147
 148 #define IBNibRefObj_repr NULL
 149
 150 #define IBNibRefObj_hash NULL
 151 #define IBNibRefObj_tp_init 0
 152
 153 #define IBNibRefObj_tp_alloc PyType_GenericAlloc
 154
 155 static PyObject *IBNibRefObj_tp_new(PyTypeObject *type, PyObject *args, PyObject *kwds)
 156 {
 157         PyObject *self;
 158         IBNibRef itself;
 159         char *kw[] = {"itself", 0};
 160
 161         if (!PyArg_ParseTupleAndKeywords(args, kwds, "O&", kw, IBNibRefObj_Convert, &itself)) return NULL;
 162         if ((self = type->tp_alloc(type, 0)) == NULL) return NULL;
 163         ((IBNibRefObject *)self)->ob_itself = itself;
 164         return self;
 165 }
 166
 167 #define IBNibRefObj_tp_free PyObject_Del
 168
 169
 170 PyTypeObject IBNibRef_Type = {
 171         PyObject_HEAD_INIT(NULL)
 172         0, /*ob_size*/
 173         "_IBCarbon.IBNibRef", /*tp_name*/
 174         sizeof(IBNibRefObject), /*tp_basicsize*/
 175         0, /*tp_itemsize*/
 176         /* methods */
 177         (destructor) IBNibRefObj_dealloc, /*tp_dealloc*/
 178         0, /*tp_print*/
 179         (getattrfunc)0, /*tp_getattr*/
 180         (setattrfunc)0, /*tp_setattr*/
 181         (cmpfunc) IBNibRefObj_compare, /*tp_compare*/
 182         (reprfunc) IBNibRefObj_repr, /*tp_repr*/
 183         (PyNumberMethods *)0, /* tp_as_number */
 184         (PySequenceMethods *)0, /* tp_as_sequence */
 185         (PyMappingMethods *)0, /* tp_as_mapping */
 186         (hashfunc) IBNibRefObj_hash, /*tp_hash*/
 187         0, /*tp_call*/
 188         0, /*tp_str*/
 189         PyObject_GenericGetAttr, /*tp_getattro*/
 190         PyObject_GenericSetAttr, /*tp_setattro */
 191         0, /*tp_as_buffer*/
 192         Py_TPFLAGS_DEFAULT|Py_TPFLAGS_BASETYPE, /* tp_flags */
 193         0, /*tp_doc*/
 194         0, /*tp_traverse*/
 195         0, /*tp_clear*/
 196         0, /*tp_richcompare*/
 197         0, /*tp_weaklistoffset*/
 198         0, /*tp_iter*/
 199         0, /*tp_iternext*/
 200         IBNibRefObj_methods, /* tp_methods */
 201         0, /*tp_members*/
 202         IBNibRefObj_getsetlist, /*tp_getset*/
 203         0, /*tp_base*/
 204         0, /*tp_dict*/
 205         0, /*tp_descr_get*/
 206         0, /*tp_descr_set*/
 207         0, /*tp_dictoffset*/
 208         IBNibRefObj_tp_init, /* tp_init */
 209         IBNibRefObj_tp_alloc, /* tp_alloc */
 210         IBNibRefObj_tp_new, /* tp_new */
 211         IBNibRefObj_tp_free, /* tp_free */
 212 };
 213
 214 /* -------------------- End object type IBNibRef -------------------- */
 215
 216
 217 static PyObject *IBCarbon_CreateNibReference(PyObject *_self, PyObject *_args)
 218 {
 219         PyObject *_res = NULL;
 220         OSStatus _err;
 221         CFStringRef inNibName;
 222         IBNibRef outNibRef;
 223         if (!PyArg_ParseTuple(_args, "O&",
 224                               CFStringRefObj_Convert, &inNibName))
 225                 return NULL;
 226         _err = CreateNibReference(inNibName,
 227                                   &outNibRef);
 228         if (_err != noErr) return PyMac_Error(_err);
 229         _res = Py_BuildValue("O&",
 230                              IBNibRefObj_New, outNibRef);
 231         return _res;
 232 }
 233
 234 static PyMethodDef IBCarbon_methods[] = {
 235         {"CreateNibReference", (PyCFunction)IBCarbon_CreateNibReference, 1,
 236          PyDoc_STR("(CFStringRef inNibName) -> (IBNibRef outNibRef)")},
 237         {NULL, NULL, 0}
 238 };
 239
 240
 241
 242
 243 void init_IBCarbon(void)
 244 {
 245         PyObject *m;
 246         PyObject *d;
 247
 248
 249
 250
 251
 252         m = Py_InitModule("_IBCarbon", IBCarbon_methods);
 253         d = PyModule_GetDict(m);
 254         IBCarbon_Error = PyMac_GetOSErrException();
 255         if (IBCarbon_Error == NULL ||
 256             PyDict_SetItemString(d, "Error", IBCarbon_Error) != 0)
 257                 return;
 258         IBNibRef_Type.ob_type = &PyType_Type;
 259         if (PyType_Ready(&IBNibRef_Type) < 0) return;
 260         Py_INCREF(&IBNibRef_Type);
 261         PyModule_AddObject(m, "IBNibRef", (PyObject *)&IBNibRef_Type);
 262         /* Backward-compatible name */
 263         Py_INCREF(&IBNibRef_Type);
 264         PyModule_AddObject(m, "IBNibRefType", (PyObject *)&IBNibRef_Type);
 265 }
 266
 267 /* ====================== End module _IBCarbon ====================== */
 268