cpython-lru_cache-weakref: Mac/Modules/res/Resmodule.c annotate

annotate Mac/Modules/res/Resmodule.c @ 4566:6403c94de50d legacy-trunk

Added safeguard against failure in __del__.

author	Guido van Rossum <guido@python.org>
date	Wed, 27 Nov 1996 19:39:58 +0000
parents	84e16cf92199
children	a5d503eca747

rev	line source
2267 7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	2 /* =========================== Module Res =========================== */
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	3
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	4 #include "Python.h"
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	5
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	6
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	7
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	8 #define SystemSevenOrLater 1
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	9
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	10 #include "macglue.h"
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	11 #include <Memory.h>
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	12 #include <Dialogs.h>
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	13 #include <Menus.h>
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	14 #include <Controls.h>
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	15
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	16 extern PyObject *ResObj_New(Handle);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	17 extern int ResObj_Convert(PyObject , Handle );
3295 3ca111e0b1a7 - Added color window/pixmap support Jack Jansen <jack.jansen@cwi.nl> parents: 3268 diff changeset	18 extern PyObject *OptResObj_New(Handle);
3ca111e0b1a7 - Added color window/pixmap support Jack Jansen <jack.jansen@cwi.nl> parents: 3268 diff changeset	19 extern int OptResObj_Convert(PyObject , Handle );
2267 7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	20
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	21 extern PyObject *WinObj_New(WindowPtr);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	22 extern int WinObj_Convert(PyObject , WindowPtr );
3295 3ca111e0b1a7 - Added color window/pixmap support Jack Jansen <jack.jansen@cwi.nl> parents: 3268 diff changeset	23 extern PyTypeObject Window_Type;
3ca111e0b1a7 - Added color window/pixmap support Jack Jansen <jack.jansen@cwi.nl> parents: 3268 diff changeset	24 #define WinObj_Check(x) ((x)->ob_type == &Window_Type)
2267 7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	25
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	26 extern PyObject *DlgObj_New(DialogPtr);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	27 extern int DlgObj_Convert(PyObject , DialogPtr );
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	28 extern PyTypeObject Dialog_Type;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	29 #define DlgObj_Check(x) ((x)->ob_type == &Dialog_Type)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	30
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	31 extern PyObject *MenuObj_New(MenuHandle);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	32 extern int MenuObj_Convert(PyObject , MenuHandle );
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	33
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	34 extern PyObject *CtlObj_New(ControlHandle);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	35 extern int CtlObj_Convert(PyObject , ControlHandle );
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	36
3295 3ca111e0b1a7 - Added color window/pixmap support Jack Jansen <jack.jansen@cwi.nl> parents: 3268 diff changeset	37 extern PyObject *GrafObj_New(GrafPtr);
3ca111e0b1a7 - Added color window/pixmap support Jack Jansen <jack.jansen@cwi.nl> parents: 3268 diff changeset	38 extern int GrafObj_Convert(PyObject , GrafPtr );
3ca111e0b1a7 - Added color window/pixmap support Jack Jansen <jack.jansen@cwi.nl> parents: 3268 diff changeset	39
3ca111e0b1a7 - Added color window/pixmap support Jack Jansen <jack.jansen@cwi.nl> parents: 3268 diff changeset	40 extern PyObject *BMObj_New(BitMapPtr);
3ca111e0b1a7 - Added color window/pixmap support Jack Jansen <jack.jansen@cwi.nl> parents: 3268 diff changeset	41 extern int BMObj_Convert(PyObject , BitMapPtr );
3ca111e0b1a7 - Added color window/pixmap support Jack Jansen <jack.jansen@cwi.nl> parents: 3268 diff changeset	42
2283 7859d3aab1b4 added Resource(), to create new resources from Python Guido van Rossum <guido@python.org> parents: 2267 diff changeset	43 extern PyObject *WinObj_WhichWindow(WindowPtr);
7859d3aab1b4 added Resource(), to create new resources from Python Guido van Rossum <guido@python.org> parents: 2267 diff changeset	44
2267 7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	45 #include <Resources.h>
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	46
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	47 #define resNotFound -192 /* Can't include <Errors.h> because of Python's "errors.h" */
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	48
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	49 static PyObject *Res_Error;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	50
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	51 /* ---------------------- Object type Resource ---------------------- */
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	52
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	53 PyTypeObject Resource_Type;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	54
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	55 #define ResObj_Check(x) ((x)->ob_type == &Resource_Type)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	56
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	57 typedef struct ResourceObject {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	58 PyObject_HEAD
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	59 Handle ob_itself;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	60 } ResourceObject;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	61
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	62 PyObject *ResObj_New(itself)
2514 f4dc51f78a56 the usual Guido van Rossum <guido@python.org> parents: 2283 diff changeset	63 Handle itself;
2267 7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	64 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	65 ResourceObject *it;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	66 if (itself == NULL) return PyMac_Error(resNotFound);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	67 it = PyObject_NEW(ResourceObject, &Resource_Type);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	68 if (it == NULL) return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	69 it->ob_itself = itself;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	70 return (PyObject *)it;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	71 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	72 ResObj_Convert(v, p_itself)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	73 PyObject *v;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	74 Handle *p_itself;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	75 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	76 if (!ResObj_Check(v))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	77 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	78 PyErr_SetString(PyExc_TypeError, "Resource required");
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	79 return 0;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	80 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	81 p_itself = ((ResourceObject )v)->ob_itself;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	82 return 1;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	83 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	84
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	85 static void ResObj_dealloc(self)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	86 ResourceObject *self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	87 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	88 /* Cleanup of self->ob_itself goes here */
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	89 PyMem_DEL(self);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	90 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	91
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	92 static PyObject *ResObj_HomeResFile(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	93 ResourceObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	94 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	95 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	96 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	97 short _rv;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	98 if (!PyArg_ParseTuple(_args, ""))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	99 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	100 _rv = HomeResFile(_self->ob_itself);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	101 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	102 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	103 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	104 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	105 _res = Py_BuildValue("h",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	106 _rv);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	107 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	108 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	109
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	110 static PyObject *ResObj_LoadResource(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	111 ResourceObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	112 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	113 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	114 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	115 if (!PyArg_ParseTuple(_args, ""))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	116 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	117 LoadResource(_self->ob_itself);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	118 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	119 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	120 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	121 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	122 Py_INCREF(Py_None);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	123 _res = Py_None;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	124 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	125 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	126
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	127 static PyObject *ResObj_ReleaseResource(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	128 ResourceObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	129 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	130 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	131 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	132 if (!PyArg_ParseTuple(_args, ""))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	133 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	134 ReleaseResource(_self->ob_itself);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	135 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	136 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	137 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	138 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	139 Py_INCREF(Py_None);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	140 _res = Py_None;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	141 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	142 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	143
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	144 static PyObject *ResObj_DetachResource(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	145 ResourceObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	146 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	147 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	148 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	149 if (!PyArg_ParseTuple(_args, ""))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	150 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	151 DetachResource(_self->ob_itself);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	152 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	153 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	154 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	155 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	156 Py_INCREF(Py_None);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	157 _res = Py_None;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	158 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	159 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	160
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	161 static PyObject *ResObj_GetResAttrs(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	162 ResourceObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	163 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	164 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	165 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	166 short _rv;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	167 if (!PyArg_ParseTuple(_args, ""))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	168 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	169 _rv = GetResAttrs(_self->ob_itself);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	170 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	171 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	172 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	173 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	174 _res = Py_BuildValue("h",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	175 _rv);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	176 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	177 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	178
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	179 static PyObject *ResObj_GetResInfo(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	180 ResourceObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	181 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	182 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	183 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	184 short theID;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	185 ResType theType;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	186 Str255 name;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	187 if (!PyArg_ParseTuple(_args, ""))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	188 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	189 GetResInfo(_self->ob_itself,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	190 &theID,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	191 &theType,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	192 name);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	193 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	194 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	195 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	196 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	197 _res = Py_BuildValue("hO&O&",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	198 theID,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	199 PyMac_BuildOSType, theType,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	200 PyMac_BuildStr255, name);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	201 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	202 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	203
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	204 static PyObject *ResObj_SetResInfo(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	205 ResourceObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	206 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	207 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	208 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	209 short theID;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	210 Str255 name;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	211 if (!PyArg_ParseTuple(_args, "hO&",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	212 &theID,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	213 PyMac_GetStr255, name))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	214 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	215 SetResInfo(_self->ob_itself,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	216 theID,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	217 name);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	218 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	219 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	220 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	221 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	222 Py_INCREF(Py_None);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	223 _res = Py_None;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	224 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	225 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	226
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	227 static PyObject *ResObj_AddResource(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	228 ResourceObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	229 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	230 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	231 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	232 ResType theType;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	233 short theID;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	234 Str255 name;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	235 if (!PyArg_ParseTuple(_args, "O&hO&",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	236 PyMac_GetOSType, &theType,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	237 &theID,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	238 PyMac_GetStr255, name))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	239 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	240 AddResource(_self->ob_itself,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	241 theType,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	242 theID,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	243 name);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	244 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	245 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	246 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	247 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	248 Py_INCREF(Py_None);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	249 _res = Py_None;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	250 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	251 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	252
2721 364d4a524cec Trying again to check it in. Changes to: Jack Jansen <jack.jansen@cwi.nl> parents: 2514 diff changeset	253 static PyObject *ResObj_GetResourceSizeOnDisk(_self, _args)
2267 7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	254 ResourceObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	255 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	256 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	257 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	258 long _rv;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	259 if (!PyArg_ParseTuple(_args, ""))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	260 return NULL;
2721 364d4a524cec Trying again to check it in. Changes to: Jack Jansen <jack.jansen@cwi.nl> parents: 2514 diff changeset	261 _rv = GetResourceSizeOnDisk(_self->ob_itself);
2267 7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	262 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	263 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	264 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	265 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	266 _res = Py_BuildValue("l",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	267 _rv);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	268 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	269 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	270
2721 364d4a524cec Trying again to check it in. Changes to: Jack Jansen <jack.jansen@cwi.nl> parents: 2514 diff changeset	271 static PyObject *ResObj_GetMaxResourceSize(_self, _args)
2267 7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	272 ResourceObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	273 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	274 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	275 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	276 long _rv;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	277 if (!PyArg_ParseTuple(_args, ""))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	278 return NULL;
2721 364d4a524cec Trying again to check it in. Changes to: Jack Jansen <jack.jansen@cwi.nl> parents: 2514 diff changeset	279 _rv = GetMaxResourceSize(_self->ob_itself);
2267 7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	280 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	281 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	282 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	283 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	284 _res = Py_BuildValue("l",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	285 _rv);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	286 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	287 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	288
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	289 static PyObject *ResObj_RsrcMapEntry(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	290 ResourceObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	291 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	292 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	293 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	294 long _rv;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	295 if (!PyArg_ParseTuple(_args, ""))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	296 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	297 _rv = RsrcMapEntry(_self->ob_itself);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	298 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	299 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	300 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	301 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	302 _res = Py_BuildValue("l",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	303 _rv);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	304 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	305 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	306
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	307 static PyObject *ResObj_SetResAttrs(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	308 ResourceObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	309 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	310 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	311 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	312 short attrs;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	313 if (!PyArg_ParseTuple(_args, "h",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	314 &attrs))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	315 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	316 SetResAttrs(_self->ob_itself,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	317 attrs);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	318 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	319 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	320 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	321 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	322 Py_INCREF(Py_None);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	323 _res = Py_None;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	324 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	325 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	326
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	327 static PyObject *ResObj_ChangedResource(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	328 ResourceObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	329 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	330 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	331 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	332 if (!PyArg_ParseTuple(_args, ""))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	333 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	334 ChangedResource(_self->ob_itself);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	335 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	336 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	337 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	338 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	339 Py_INCREF(Py_None);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	340 _res = Py_None;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	341 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	342 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	343
2721 364d4a524cec Trying again to check it in. Changes to: Jack Jansen <jack.jansen@cwi.nl> parents: 2514 diff changeset	344 static PyObject *ResObj_RemoveResource(_self, _args)
2267 7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	345 ResourceObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	346 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	347 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	348 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	349 if (!PyArg_ParseTuple(_args, ""))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	350 return NULL;
2721 364d4a524cec Trying again to check it in. Changes to: Jack Jansen <jack.jansen@cwi.nl> parents: 2514 diff changeset	351 RemoveResource(_self->ob_itself);
2267 7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	352 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	353 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	354 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	355 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	356 Py_INCREF(Py_None);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	357 _res = Py_None;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	358 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	359 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	360
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	361 static PyObject *ResObj_WriteResource(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	362 ResourceObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	363 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	364 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	365 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	366 if (!PyArg_ParseTuple(_args, ""))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	367 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	368 WriteResource(_self->ob_itself);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	369 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	370 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	371 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	372 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	373 Py_INCREF(Py_None);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	374 _res = Py_None;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	375 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	376 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	377
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	378 static PyObject *ResObj_SetResourceSize(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	379 ResourceObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	380 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	381 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	382 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	383 long newSize;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	384 if (!PyArg_ParseTuple(_args, "l",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	385 &newSize))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	386 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	387 SetResourceSize(_self->ob_itself,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	388 newSize);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	389 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	390 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	391 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	392 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	393 Py_INCREF(Py_None);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	394 _res = Py_None;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	395 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	396 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	397
2721 364d4a524cec Trying again to check it in. Changes to: Jack Jansen <jack.jansen@cwi.nl> parents: 2514 diff changeset	398 static PyObject *ResObj_GetNextFOND(_self, _args)
364d4a524cec Trying again to check it in. Changes to: Jack Jansen <jack.jansen@cwi.nl> parents: 2514 diff changeset	399 ResourceObject *_self;
364d4a524cec Trying again to check it in. Changes to: Jack Jansen <jack.jansen@cwi.nl> parents: 2514 diff changeset	400 PyObject *_args;
364d4a524cec Trying again to check it in. Changes to: Jack Jansen <jack.jansen@cwi.nl> parents: 2514 diff changeset	401 {
364d4a524cec Trying again to check it in. Changes to: Jack Jansen <jack.jansen@cwi.nl> parents: 2514 diff changeset	402 PyObject *_res = NULL;
364d4a524cec Trying again to check it in. Changes to: Jack Jansen <jack.jansen@cwi.nl> parents: 2514 diff changeset	403 Handle _rv;
364d4a524cec Trying again to check it in. Changes to: Jack Jansen <jack.jansen@cwi.nl> parents: 2514 diff changeset	404 if (!PyArg_ParseTuple(_args, ""))
364d4a524cec Trying again to check it in. Changes to: Jack Jansen <jack.jansen@cwi.nl> parents: 2514 diff changeset	405 return NULL;
364d4a524cec Trying again to check it in. Changes to: Jack Jansen <jack.jansen@cwi.nl> parents: 2514 diff changeset	406 _rv = GetNextFOND(_self->ob_itself);
364d4a524cec Trying again to check it in. Changes to: Jack Jansen <jack.jansen@cwi.nl> parents: 2514 diff changeset	407 {
364d4a524cec Trying again to check it in. Changes to: Jack Jansen <jack.jansen@cwi.nl> parents: 2514 diff changeset	408 OSErr _err = ResError();
364d4a524cec Trying again to check it in. Changes to: Jack Jansen <jack.jansen@cwi.nl> parents: 2514 diff changeset	409 if (_err != noErr) return PyMac_Error(_err);
364d4a524cec Trying again to check it in. Changes to: Jack Jansen <jack.jansen@cwi.nl> parents: 2514 diff changeset	410 }
364d4a524cec Trying again to check it in. Changes to: Jack Jansen <jack.jansen@cwi.nl> parents: 2514 diff changeset	411 _res = Py_BuildValue("O&",
364d4a524cec Trying again to check it in. Changes to: Jack Jansen <jack.jansen@cwi.nl> parents: 2514 diff changeset	412 ResObj_New, _rv);
364d4a524cec Trying again to check it in. Changes to: Jack Jansen <jack.jansen@cwi.nl> parents: 2514 diff changeset	413 return _res;
364d4a524cec Trying again to check it in. Changes to: Jack Jansen <jack.jansen@cwi.nl> parents: 2514 diff changeset	414 }
364d4a524cec Trying again to check it in. Changes to: Jack Jansen <jack.jansen@cwi.nl> parents: 2514 diff changeset	415
2753 4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	416 static PyObject *ResObj_as_Control(_self, _args)
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	417 ResourceObject *_self;
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	418 PyObject *_args;
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	419 {
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	420 PyObject *_res = NULL;
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	421
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	422 return CtlObj_New((ControlHandle)_self->ob_itself);
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	423
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	424 }
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	425
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	426 static PyObject *ResObj_as_Menu(_self, _args)
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	427 ResourceObject *_self;
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	428 PyObject *_args;
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	429 {
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	430 PyObject *_res = NULL;
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	431
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	432 return MenuObj_New((MenuHandle)_self->ob_itself);
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	433
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	434 }
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	435
2267 7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	436 static PyMethodDef ResObj_methods[] = {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	437 {"HomeResFile", (PyCFunction)ResObj_HomeResFile, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	438 "() -> (short _rv)"},
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	439 {"LoadResource", (PyCFunction)ResObj_LoadResource, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	440 "() -> None"},
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	441 {"ReleaseResource", (PyCFunction)ResObj_ReleaseResource, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	442 "() -> None"},
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	443 {"DetachResource", (PyCFunction)ResObj_DetachResource, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	444 "() -> None"},
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	445 {"GetResAttrs", (PyCFunction)ResObj_GetResAttrs, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	446 "() -> (short _rv)"},
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	447 {"GetResInfo", (PyCFunction)ResObj_GetResInfo, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	448 "() -> (short theID, ResType theType, Str255 name)"},
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	449 {"SetResInfo", (PyCFunction)ResObj_SetResInfo, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	450 "(short theID, Str255 name) -> None"},
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	451 {"AddResource", (PyCFunction)ResObj_AddResource, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	452 "(ResType theType, short theID, Str255 name) -> None"},
2721 364d4a524cec Trying again to check it in. Changes to: Jack Jansen <jack.jansen@cwi.nl> parents: 2514 diff changeset	453 {"GetResourceSizeOnDisk", (PyCFunction)ResObj_GetResourceSizeOnDisk, 1,
2267 7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	454 "() -> (long _rv)"},
2721 364d4a524cec Trying again to check it in. Changes to: Jack Jansen <jack.jansen@cwi.nl> parents: 2514 diff changeset	455 {"GetMaxResourceSize", (PyCFunction)ResObj_GetMaxResourceSize, 1,
2267 7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	456 "() -> (long _rv)"},
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	457 {"RsrcMapEntry", (PyCFunction)ResObj_RsrcMapEntry, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	458 "() -> (long _rv)"},
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	459 {"SetResAttrs", (PyCFunction)ResObj_SetResAttrs, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	460 "(short attrs) -> None"},
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	461 {"ChangedResource", (PyCFunction)ResObj_ChangedResource, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	462 "() -> None"},
2721 364d4a524cec Trying again to check it in. Changes to: Jack Jansen <jack.jansen@cwi.nl> parents: 2514 diff changeset	463 {"RemoveResource", (PyCFunction)ResObj_RemoveResource, 1,
2267 7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	464 "() -> None"},
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	465 {"WriteResource", (PyCFunction)ResObj_WriteResource, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	466 "() -> None"},
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	467 {"SetResourceSize", (PyCFunction)ResObj_SetResourceSize, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	468 "(long newSize) -> None"},
2721 364d4a524cec Trying again to check it in. Changes to: Jack Jansen <jack.jansen@cwi.nl> parents: 2514 diff changeset	469 {"GetNextFOND", (PyCFunction)ResObj_GetNextFOND, 1,
364d4a524cec Trying again to check it in. Changes to: Jack Jansen <jack.jansen@cwi.nl> parents: 2514 diff changeset	470 "() -> (Handle _rv)"},
2753 4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	471 {"as_Control", (PyCFunction)ResObj_as_Control, 1,
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	472 "Return this resource/handle as a Control"},
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	473 {"as_Menu", (PyCFunction)ResObj_as_Menu, 1,
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	474 "Return this resource/handle as a Menu"},
2267 7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	475 {NULL, NULL, 0}
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	476 };
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	477
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	478 PyMethodChain ResObj_chain = { ResObj_methods, NULL };
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	479
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	480 static PyObject *ResObj_getattr(self, name)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	481 ResourceObject *self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	482 char *name;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	483 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	484
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	485 if (strcmp(name, "size") == 0)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	486 return PyInt_FromLong(GetHandleSize(self->ob_itself));
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	487 if (strcmp(name, "data") == 0) {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	488 PyObject *res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	489 char state;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	490 state = HGetState(self->ob_itself);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	491 HLock(self->ob_itself);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	492 res = PyString_FromStringAndSize(
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	493 *self->ob_itself,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	494 GetHandleSize(self->ob_itself));
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	495 HUnlock(self->ob_itself);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	496 HSetState(self->ob_itself, state);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	497 return res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	498 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	499 if (strcmp(name, "__members__") == 0)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	500 return Py_BuildValue("[ss]", "data", "size");
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	501
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	502 return Py_FindMethodInChain(&ResObj_chain, (PyObject *)self, name);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	503 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	504
2753 4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	505 static int
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	506 ResObj_setattr(self, name, value)
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	507 ResourceObject *self;
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	508 char *name;
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	509 PyObject *value;
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	510 {
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	511 char *data;
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	512 long size;
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	513
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	514 if (strcmp(name, "data") != 0 \|\| value == NULL )
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	515 return -1;
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	516 if ( !PyString_Check(value) )
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	517 return -1;
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	518 size = PyString_Size(value);
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	519 data = PyString_AsString(value);
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	520 /* XXXX Do I need the GetState/SetState calls? */
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	521 SetHandleSize(self->ob_itself, size);
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	522 if ( MemError())
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	523 return -1;
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	524 HLock(self->ob_itself);
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	525 memcpy((char )self->ob_itself, data, size);
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	526 HUnlock(self->ob_itself);
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	527 /* XXXX Should I do the Changed call immedeately? */
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	528 return 0;
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	529 }
4b74b3b43269 Added methods as_Menu and as_Control to convert a resource Jack Jansen <jack.jansen@cwi.nl> parents: 2723 diff changeset	530
2267 7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	531
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	532 PyTypeObject Resource_Type = {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	533 PyObject_HEAD_INIT(&PyType_Type)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	534 0, /ob_size/
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	535 "Resource", /tp_name/
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	536 sizeof(ResourceObject), /tp_basicsize/
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	537 0, /tp_itemsize/
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	538 /* methods */
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	539 (destructor) ResObj_dealloc, /tp_dealloc/
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	540 0, /tp_print/
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	541 (getattrfunc) ResObj_getattr, /tp_getattr/
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	542 (setattrfunc) ResObj_setattr, /tp_setattr/
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	543 };
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	544
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	545 /* -------------------- End object type Resource -------------------- */
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	546
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	547
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	548 static PyObject *Res_InitResources(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	549 PyObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	550 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	551 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	552 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	553 short _rv;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	554 if (!PyArg_ParseTuple(_args, ""))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	555 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	556 _rv = InitResources();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	557 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	558 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	559 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	560 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	561 _res = Py_BuildValue("h",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	562 _rv);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	563 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	564 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	565
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	566 static PyObject *Res_RsrcZoneInit(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	567 PyObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	568 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	569 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	570 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	571 if (!PyArg_ParseTuple(_args, ""))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	572 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	573 RsrcZoneInit();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	574 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	575 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	576 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	577 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	578 Py_INCREF(Py_None);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	579 _res = Py_None;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	580 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	581 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	582
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	583 static PyObject *Res_CloseResFile(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	584 PyObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	585 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	586 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	587 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	588 short refNum;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	589 if (!PyArg_ParseTuple(_args, "h",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	590 &refNum))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	591 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	592 CloseResFile(refNum);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	593 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	594 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	595 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	596 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	597 Py_INCREF(Py_None);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	598 _res = Py_None;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	599 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	600 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	601
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	602 static PyObject *Res_ResError(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	603 PyObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	604 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	605 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	606 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	607 short _rv;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	608 if (!PyArg_ParseTuple(_args, ""))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	609 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	610 _rv = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	611 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	612 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	613 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	614 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	615 _res = Py_BuildValue("h",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	616 _rv);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	617 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	618 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	619
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	620 static PyObject *Res_CurResFile(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	621 PyObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	622 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	623 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	624 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	625 short _rv;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	626 if (!PyArg_ParseTuple(_args, ""))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	627 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	628 _rv = CurResFile();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	629 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	630 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	631 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	632 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	633 _res = Py_BuildValue("h",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	634 _rv);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	635 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	636 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	637
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	638 static PyObject *Res_CreateResFile(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	639 PyObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	640 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	641 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	642 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	643 Str255 fileName;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	644 if (!PyArg_ParseTuple(_args, "O&",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	645 PyMac_GetStr255, fileName))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	646 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	647 CreateResFile(fileName);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	648 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	649 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	650 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	651 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	652 Py_INCREF(Py_None);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	653 _res = Py_None;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	654 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	655 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	656
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	657 static PyObject *Res_OpenResFile(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	658 PyObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	659 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	660 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	661 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	662 short _rv;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	663 Str255 fileName;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	664 if (!PyArg_ParseTuple(_args, "O&",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	665 PyMac_GetStr255, fileName))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	666 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	667 _rv = OpenResFile(fileName);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	668 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	669 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	670 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	671 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	672 _res = Py_BuildValue("h",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	673 _rv);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	674 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	675 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	676
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	677 static PyObject *Res_UseResFile(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	678 PyObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	679 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	680 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	681 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	682 short refNum;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	683 if (!PyArg_ParseTuple(_args, "h",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	684 &refNum))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	685 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	686 UseResFile(refNum);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	687 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	688 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	689 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	690 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	691 Py_INCREF(Py_None);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	692 _res = Py_None;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	693 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	694 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	695
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	696 static PyObject *Res_CountTypes(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	697 PyObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	698 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	699 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	700 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	701 short _rv;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	702 if (!PyArg_ParseTuple(_args, ""))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	703 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	704 _rv = CountTypes();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	705 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	706 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	707 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	708 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	709 _res = Py_BuildValue("h",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	710 _rv);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	711 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	712 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	713
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	714 static PyObject *Res_Count1Types(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	715 PyObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	716 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	717 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	718 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	719 short _rv;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	720 if (!PyArg_ParseTuple(_args, ""))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	721 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	722 _rv = Count1Types();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	723 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	724 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	725 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	726 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	727 _res = Py_BuildValue("h",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	728 _rv);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	729 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	730 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	731
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	732 static PyObject *Res_GetIndType(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	733 PyObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	734 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	735 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	736 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	737 ResType theType;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	738 short index;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	739 if (!PyArg_ParseTuple(_args, "h",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	740 &index))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	741 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	742 GetIndType(&theType,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	743 index);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	744 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	745 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	746 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	747 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	748 _res = Py_BuildValue("O&",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	749 PyMac_BuildOSType, theType);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	750 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	751 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	752
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	753 static PyObject *Res_Get1IndType(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	754 PyObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	755 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	756 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	757 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	758 ResType theType;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	759 short index;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	760 if (!PyArg_ParseTuple(_args, "h",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	761 &index))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	762 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	763 Get1IndType(&theType,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	764 index);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	765 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	766 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	767 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	768 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	769 _res = Py_BuildValue("O&",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	770 PyMac_BuildOSType, theType);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	771 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	772 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	773
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	774 static PyObject *Res_SetResLoad(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	775 PyObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	776 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	777 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	778 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	779 Boolean load;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	780 if (!PyArg_ParseTuple(_args, "b",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	781 &load))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	782 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	783 SetResLoad(load);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	784 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	785 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	786 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	787 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	788 Py_INCREF(Py_None);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	789 _res = Py_None;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	790 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	791 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	792
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	793 static PyObject *Res_CountResources(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	794 PyObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	795 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	796 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	797 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	798 short _rv;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	799 ResType theType;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	800 if (!PyArg_ParseTuple(_args, "O&",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	801 PyMac_GetOSType, &theType))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	802 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	803 _rv = CountResources(theType);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	804 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	805 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	806 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	807 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	808 _res = Py_BuildValue("h",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	809 _rv);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	810 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	811 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	812
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	813 static PyObject *Res_Count1Resources(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	814 PyObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	815 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	816 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	817 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	818 short _rv;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	819 ResType theType;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	820 if (!PyArg_ParseTuple(_args, "O&",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	821 PyMac_GetOSType, &theType))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	822 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	823 _rv = Count1Resources(theType);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	824 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	825 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	826 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	827 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	828 _res = Py_BuildValue("h",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	829 _rv);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	830 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	831 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	832
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	833 static PyObject *Res_GetIndResource(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	834 PyObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	835 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	836 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	837 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	838 Handle _rv;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	839 ResType theType;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	840 short index;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	841 if (!PyArg_ParseTuple(_args, "O&h",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	842 PyMac_GetOSType, &theType,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	843 &index))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	844 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	845 _rv = GetIndResource(theType,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	846 index);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	847 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	848 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	849 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	850 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	851 _res = Py_BuildValue("O&",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	852 ResObj_New, _rv);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	853 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	854 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	855
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	856 static PyObject *Res_Get1IndResource(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	857 PyObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	858 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	859 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	860 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	861 Handle _rv;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	862 ResType theType;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	863 short index;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	864 if (!PyArg_ParseTuple(_args, "O&h",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	865 PyMac_GetOSType, &theType,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	866 &index))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	867 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	868 _rv = Get1IndResource(theType,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	869 index);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	870 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	871 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	872 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	873 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	874 _res = Py_BuildValue("O&",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	875 ResObj_New, _rv);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	876 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	877 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	878
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	879 static PyObject *Res_GetResource(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	880 PyObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	881 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	882 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	883 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	884 Handle _rv;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	885 ResType theType;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	886 short theID;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	887 if (!PyArg_ParseTuple(_args, "O&h",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	888 PyMac_GetOSType, &theType,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	889 &theID))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	890 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	891 _rv = GetResource(theType,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	892 theID);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	893 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	894 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	895 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	896 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	897 _res = Py_BuildValue("O&",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	898 ResObj_New, _rv);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	899 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	900 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	901
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	902 static PyObject *Res_Get1Resource(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	903 PyObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	904 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	905 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	906 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	907 Handle _rv;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	908 ResType theType;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	909 short theID;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	910 if (!PyArg_ParseTuple(_args, "O&h",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	911 PyMac_GetOSType, &theType,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	912 &theID))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	913 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	914 _rv = Get1Resource(theType,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	915 theID);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	916 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	917 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	918 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	919 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	920 _res = Py_BuildValue("O&",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	921 ResObj_New, _rv);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	922 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	923 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	924
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	925 static PyObject *Res_GetNamedResource(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	926 PyObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	927 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	928 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	929 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	930 Handle _rv;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	931 ResType theType;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	932 Str255 name;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	933 if (!PyArg_ParseTuple(_args, "O&O&",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	934 PyMac_GetOSType, &theType,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	935 PyMac_GetStr255, name))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	936 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	937 _rv = GetNamedResource(theType,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	938 name);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	939 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	940 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	941 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	942 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	943 _res = Py_BuildValue("O&",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	944 ResObj_New, _rv);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	945 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	946 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	947
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	948 static PyObject *Res_Get1NamedResource(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	949 PyObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	950 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	951 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	952 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	953 Handle _rv;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	954 ResType theType;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	955 Str255 name;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	956 if (!PyArg_ParseTuple(_args, "O&O&",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	957 PyMac_GetOSType, &theType,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	958 PyMac_GetStr255, name))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	959 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	960 _rv = Get1NamedResource(theType,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	961 name);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	962 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	963 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	964 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	965 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	966 _res = Py_BuildValue("O&",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	967 ResObj_New, _rv);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	968 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	969 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	970
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	971 static PyObject *Res_UniqueID(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	972 PyObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	973 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	974 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	975 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	976 short _rv;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	977 ResType theType;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	978 if (!PyArg_ParseTuple(_args, "O&",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	979 PyMac_GetOSType, &theType))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	980 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	981 _rv = UniqueID(theType);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	982 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	983 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	984 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	985 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	986 _res = Py_BuildValue("h",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	987 _rv);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	988 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	989 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	990
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	991 static PyObject *Res_Unique1ID(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	992 PyObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	993 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	994 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	995 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	996 short _rv;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	997 ResType theType;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	998 if (!PyArg_ParseTuple(_args, "O&",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	999 PyMac_GetOSType, &theType))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1000 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1001 _rv = Unique1ID(theType);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1002 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1003 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1004 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1005 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1006 _res = Py_BuildValue("h",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1007 _rv);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1008 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1009 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1010
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1011 static PyObject *Res_UpdateResFile(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1012 PyObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1013 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1014 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1015 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1016 short refNum;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1017 if (!PyArg_ParseTuple(_args, "h",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1018 &refNum))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1019 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1020 UpdateResFile(refNum);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1021 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1022 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1023 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1024 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1025 Py_INCREF(Py_None);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1026 _res = Py_None;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1027 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1028 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1029
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1030 static PyObject *Res_SetResPurge(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1031 PyObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1032 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1033 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1034 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1035 Boolean install;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1036 if (!PyArg_ParseTuple(_args, "b",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1037 &install))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1038 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1039 SetResPurge(install);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1040 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1041 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1042 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1043 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1044 Py_INCREF(Py_None);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1045 _res = Py_None;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1046 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1047 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1048
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1049 static PyObject *Res_GetResFileAttrs(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1050 PyObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1051 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1052 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1053 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1054 short _rv;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1055 short refNum;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1056 if (!PyArg_ParseTuple(_args, "h",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1057 &refNum))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1058 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1059 _rv = GetResFileAttrs(refNum);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1060 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1061 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1062 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1063 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1064 _res = Py_BuildValue("h",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1065 _rv);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1066 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1067 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1068
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1069 static PyObject *Res_SetResFileAttrs(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1070 PyObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1071 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1072 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1073 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1074 short refNum;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1075 short attrs;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1076 if (!PyArg_ParseTuple(_args, "hh",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1077 &refNum,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1078 &attrs))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1079 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1080 SetResFileAttrs(refNum,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1081 attrs);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1082 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1083 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1084 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1085 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1086 Py_INCREF(Py_None);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1087 _res = Py_None;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1088 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1089 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1090
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1091 static PyObject *Res_OpenRFPerm(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1092 PyObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1093 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1094 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1095 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1096 short _rv;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1097 Str255 fileName;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1098 short vRefNum;
2721 364d4a524cec Trying again to check it in. Changes to: Jack Jansen <jack.jansen@cwi.nl> parents: 2514 diff changeset	1099 SignedByte permission;
364d4a524cec Trying again to check it in. Changes to: Jack Jansen <jack.jansen@cwi.nl> parents: 2514 diff changeset	1100 if (!PyArg_ParseTuple(_args, "O&hb",
2267 7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1101 PyMac_GetStr255, fileName,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1102 &vRefNum,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1103 &permission))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1104 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1105 _rv = OpenRFPerm(fileName,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1106 vRefNum,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1107 permission);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1108 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1109 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1110 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1111 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1112 _res = Py_BuildValue("h",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1113 _rv);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1114 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1115 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1116
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1117 static PyObject *Res_RGetResource(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1118 PyObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1119 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1120 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1121 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1122 Handle _rv;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1123 ResType theType;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1124 short theID;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1125 if (!PyArg_ParseTuple(_args, "O&h",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1126 PyMac_GetOSType, &theType,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1127 &theID))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1128 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1129 _rv = RGetResource(theType,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1130 theID);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1131 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1132 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1133 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1134 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1135 _res = Py_BuildValue("O&",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1136 ResObj_New, _rv);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1137 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1138 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1139
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1140 static PyObject *Res_HOpenResFile(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1141 PyObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1142 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1143 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1144 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1145 short _rv;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1146 short vRefNum;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1147 long dirID;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1148 Str255 fileName;
2721 364d4a524cec Trying again to check it in. Changes to: Jack Jansen <jack.jansen@cwi.nl> parents: 2514 diff changeset	1149 SignedByte permission;
364d4a524cec Trying again to check it in. Changes to: Jack Jansen <jack.jansen@cwi.nl> parents: 2514 diff changeset	1150 if (!PyArg_ParseTuple(_args, "hlO&b",
2267 7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1151 &vRefNum,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1152 &dirID,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1153 PyMac_GetStr255, fileName,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1154 &permission))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1155 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1156 _rv = HOpenResFile(vRefNum,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1157 dirID,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1158 fileName,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1159 permission);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1160 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1161 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1162 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1163 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1164 _res = Py_BuildValue("h",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1165 _rv);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1166 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1167 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1168
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1169 static PyObject *Res_HCreateResFile(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1170 PyObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1171 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1172 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1173 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1174 short vRefNum;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1175 long dirID;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1176 Str255 fileName;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1177 if (!PyArg_ParseTuple(_args, "hlO&",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1178 &vRefNum,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1179 &dirID,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1180 PyMac_GetStr255, fileName))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1181 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1182 HCreateResFile(vRefNum,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1183 dirID,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1184 fileName);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1185 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1186 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1187 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1188 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1189 Py_INCREF(Py_None);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1190 _res = Py_None;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1191 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1192 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1193
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1194 static PyObject *Res_FSpOpenResFile(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1195 PyObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1196 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1197 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1198 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1199 short _rv;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1200 FSSpec spec;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1201 SignedByte permission;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1202 if (!PyArg_ParseTuple(_args, "O&b",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1203 PyMac_GetFSSpec, &spec,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1204 &permission))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1205 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1206 _rv = FSpOpenResFile(&spec,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1207 permission);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1208 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1209 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1210 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1211 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1212 _res = Py_BuildValue("h",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1213 _rv);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1214 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1215 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1216
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1217 static PyObject *Res_FSpCreateResFile(_self, _args)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1218 PyObject *_self;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1219 PyObject *_args;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1220 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1221 PyObject *_res = NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1222 FSSpec spec;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1223 OSType creator;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1224 OSType fileType;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1225 ScriptCode scriptTag;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1226 if (!PyArg_ParseTuple(_args, "O&O&O&h",
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1227 PyMac_GetFSSpec, &spec,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1228 PyMac_GetOSType, &creator,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1229 PyMac_GetOSType, &fileType,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1230 &scriptTag))
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1231 return NULL;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1232 FSpCreateResFile(&spec,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1233 creator,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1234 fileType,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1235 scriptTag);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1236 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1237 OSErr _err = ResError();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1238 if (_err != noErr) return PyMac_Error(_err);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1239 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1240 Py_INCREF(Py_None);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1241 _res = Py_None;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1242 return _res;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1243 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1244
2283 7859d3aab1b4 added Resource(), to create new resources from Python Guido van Rossum <guido@python.org> parents: 2267 diff changeset	1245 static PyObject *Res_Resource(_self, _args)
7859d3aab1b4 added Resource(), to create new resources from Python Guido van Rossum <guido@python.org> parents: 2267 diff changeset	1246 PyObject *_self;
7859d3aab1b4 added Resource(), to create new resources from Python Guido van Rossum <guido@python.org> parents: 2267 diff changeset	1247 PyObject *_args;
7859d3aab1b4 added Resource(), to create new resources from Python Guido van Rossum <guido@python.org> parents: 2267 diff changeset	1248 {
7859d3aab1b4 added Resource(), to create new resources from Python Guido van Rossum <guido@python.org> parents: 2267 diff changeset	1249 PyObject *_res = NULL;
7859d3aab1b4 added Resource(), to create new resources from Python Guido van Rossum <guido@python.org> parents: 2267 diff changeset	1250
7859d3aab1b4 added Resource(), to create new resources from Python Guido van Rossum <guido@python.org> parents: 2267 diff changeset	1251 char *buf;
7859d3aab1b4 added Resource(), to create new resources from Python Guido van Rossum <guido@python.org> parents: 2267 diff changeset	1252 int len;
7859d3aab1b4 added Resource(), to create new resources from Python Guido van Rossum <guido@python.org> parents: 2267 diff changeset	1253 Handle h;
7859d3aab1b4 added Resource(), to create new resources from Python Guido van Rossum <guido@python.org> parents: 2267 diff changeset	1254
7859d3aab1b4 added Resource(), to create new resources from Python Guido van Rossum <guido@python.org> parents: 2267 diff changeset	1255 if (!PyArg_ParseTuple(_args, "s#", &buf, &len))
7859d3aab1b4 added Resource(), to create new resources from Python Guido van Rossum <guido@python.org> parents: 2267 diff changeset	1256 return NULL;
7859d3aab1b4 added Resource(), to create new resources from Python Guido van Rossum <guido@python.org> parents: 2267 diff changeset	1257 h = NewHandle(len);
7859d3aab1b4 added Resource(), to create new resources from Python Guido van Rossum <guido@python.org> parents: 2267 diff changeset	1258 if ( h == NULL ) {
7859d3aab1b4 added Resource(), to create new resources from Python Guido van Rossum <guido@python.org> parents: 2267 diff changeset	1259 PyErr_NoMemory();
7859d3aab1b4 added Resource(), to create new resources from Python Guido van Rossum <guido@python.org> parents: 2267 diff changeset	1260 return NULL;
7859d3aab1b4 added Resource(), to create new resources from Python Guido van Rossum <guido@python.org> parents: 2267 diff changeset	1261 }
7859d3aab1b4 added Resource(), to create new resources from Python Guido van Rossum <guido@python.org> parents: 2267 diff changeset	1262 HLock(h);
7859d3aab1b4 added Resource(), to create new resources from Python Guido van Rossum <guido@python.org> parents: 2267 diff changeset	1263 memcpy(*h, buf, len);
7859d3aab1b4 added Resource(), to create new resources from Python Guido van Rossum <guido@python.org> parents: 2267 diff changeset	1264 HUnlock(h);
7859d3aab1b4 added Resource(), to create new resources from Python Guido van Rossum <guido@python.org> parents: 2267 diff changeset	1265 return (PyObject *)ResObj_New(h);
7859d3aab1b4 added Resource(), to create new resources from Python Guido van Rossum <guido@python.org> parents: 2267 diff changeset	1266
7859d3aab1b4 added Resource(), to create new resources from Python Guido van Rossum <guido@python.org> parents: 2267 diff changeset	1267 }
7859d3aab1b4 added Resource(), to create new resources from Python Guido van Rossum <guido@python.org> parents: 2267 diff changeset	1268
2267 7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1269 static PyMethodDef Res_methods[] = {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1270 {"InitResources", (PyCFunction)Res_InitResources, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1271 "() -> (short _rv)"},
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1272 {"RsrcZoneInit", (PyCFunction)Res_RsrcZoneInit, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1273 "() -> None"},
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1274 {"CloseResFile", (PyCFunction)Res_CloseResFile, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1275 "(short refNum) -> None"},
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1276 {"ResError", (PyCFunction)Res_ResError, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1277 "() -> (short _rv)"},
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1278 {"CurResFile", (PyCFunction)Res_CurResFile, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1279 "() -> (short _rv)"},
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1280 {"CreateResFile", (PyCFunction)Res_CreateResFile, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1281 "(Str255 fileName) -> None"},
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1282 {"OpenResFile", (PyCFunction)Res_OpenResFile, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1283 "(Str255 fileName) -> (short _rv)"},
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1284 {"UseResFile", (PyCFunction)Res_UseResFile, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1285 "(short refNum) -> None"},
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1286 {"CountTypes", (PyCFunction)Res_CountTypes, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1287 "() -> (short _rv)"},
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1288 {"Count1Types", (PyCFunction)Res_Count1Types, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1289 "() -> (short _rv)"},
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1290 {"GetIndType", (PyCFunction)Res_GetIndType, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1291 "(short index) -> (ResType theType)"},
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1292 {"Get1IndType", (PyCFunction)Res_Get1IndType, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1293 "(short index) -> (ResType theType)"},
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1294 {"SetResLoad", (PyCFunction)Res_SetResLoad, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1295 "(Boolean load) -> None"},
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1296 {"CountResources", (PyCFunction)Res_CountResources, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1297 "(ResType theType) -> (short _rv)"},
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1298 {"Count1Resources", (PyCFunction)Res_Count1Resources, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1299 "(ResType theType) -> (short _rv)"},
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1300 {"GetIndResource", (PyCFunction)Res_GetIndResource, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1301 "(ResType theType, short index) -> (Handle _rv)"},
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1302 {"Get1IndResource", (PyCFunction)Res_Get1IndResource, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1303 "(ResType theType, short index) -> (Handle _rv)"},
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1304 {"GetResource", (PyCFunction)Res_GetResource, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1305 "(ResType theType, short theID) -> (Handle _rv)"},
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1306 {"Get1Resource", (PyCFunction)Res_Get1Resource, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1307 "(ResType theType, short theID) -> (Handle _rv)"},
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1308 {"GetNamedResource", (PyCFunction)Res_GetNamedResource, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1309 "(ResType theType, Str255 name) -> (Handle _rv)"},
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1310 {"Get1NamedResource", (PyCFunction)Res_Get1NamedResource, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1311 "(ResType theType, Str255 name) -> (Handle _rv)"},
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1312 {"UniqueID", (PyCFunction)Res_UniqueID, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1313 "(ResType theType) -> (short _rv)"},
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1314 {"Unique1ID", (PyCFunction)Res_Unique1ID, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1315 "(ResType theType) -> (short _rv)"},
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1316 {"UpdateResFile", (PyCFunction)Res_UpdateResFile, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1317 "(short refNum) -> None"},
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1318 {"SetResPurge", (PyCFunction)Res_SetResPurge, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1319 "(Boolean install) -> None"},
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1320 {"GetResFileAttrs", (PyCFunction)Res_GetResFileAttrs, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1321 "(short refNum) -> (short _rv)"},
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1322 {"SetResFileAttrs", (PyCFunction)Res_SetResFileAttrs, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1323 "(short refNum, short attrs) -> None"},
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1324 {"OpenRFPerm", (PyCFunction)Res_OpenRFPerm, 1,
2721 364d4a524cec Trying again to check it in. Changes to: Jack Jansen <jack.jansen@cwi.nl> parents: 2514 diff changeset	1325 "(Str255 fileName, short vRefNum, SignedByte permission) -> (short _rv)"},
2267 7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1326 {"RGetResource", (PyCFunction)Res_RGetResource, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1327 "(ResType theType, short theID) -> (Handle _rv)"},
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1328 {"HOpenResFile", (PyCFunction)Res_HOpenResFile, 1,
2721 364d4a524cec Trying again to check it in. Changes to: Jack Jansen <jack.jansen@cwi.nl> parents: 2514 diff changeset	1329 "(short vRefNum, long dirID, Str255 fileName, SignedByte permission) -> (short _rv)"},
2267 7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1330 {"HCreateResFile", (PyCFunction)Res_HCreateResFile, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1331 "(short vRefNum, long dirID, Str255 fileName) -> None"},
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1332 {"FSpOpenResFile", (PyCFunction)Res_FSpOpenResFile, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1333 "(FSSpec spec, SignedByte permission) -> (short _rv)"},
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1334 {"FSpCreateResFile", (PyCFunction)Res_FSpCreateResFile, 1,
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1335 "(FSSpec spec, OSType creator, OSType fileType, ScriptCode scriptTag) -> None"},
2283 7859d3aab1b4 added Resource(), to create new resources from Python Guido van Rossum <guido@python.org> parents: 2267 diff changeset	1336 {"Resource", (PyCFunction)Res_Resource, 1,
7859d3aab1b4 added Resource(), to create new resources from Python Guido van Rossum <guido@python.org> parents: 2267 diff changeset	1337 "Convert a string to a resource object.\n\nThe created resource object is actually just a handle.\nApply AddResource() to write it to a resource file.\n"},
2267 7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1338 {NULL, NULL, 0}
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1339 };
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1340
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1341
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1342
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1343
3006 20ca58edc855 Generated anew Jack Jansen <jack.jansen@cwi.nl> parents: 2753 diff changeset	1344 /* Alternative version of ResObj_New, which returns None for null argument */
3295 3ca111e0b1a7 - Added color window/pixmap support Jack Jansen <jack.jansen@cwi.nl> parents: 3268 diff changeset	1345 PyObject *OptResObj_New(itself)
3006 20ca58edc855 Generated anew Jack Jansen <jack.jansen@cwi.nl> parents: 2753 diff changeset	1346 Handle itself;
20ca58edc855 Generated anew Jack Jansen <jack.jansen@cwi.nl> parents: 2753 diff changeset	1347 {
20ca58edc855 Generated anew Jack Jansen <jack.jansen@cwi.nl> parents: 2753 diff changeset	1348 if (itself == NULL) {
20ca58edc855 Generated anew Jack Jansen <jack.jansen@cwi.nl> parents: 2753 diff changeset	1349 Py_INCREF(Py_None);
20ca58edc855 Generated anew Jack Jansen <jack.jansen@cwi.nl> parents: 2753 diff changeset	1350 return Py_None;
20ca58edc855 Generated anew Jack Jansen <jack.jansen@cwi.nl> parents: 2753 diff changeset	1351 }
20ca58edc855 Generated anew Jack Jansen <jack.jansen@cwi.nl> parents: 2753 diff changeset	1352 return ResObj_New(itself);
20ca58edc855 Generated anew Jack Jansen <jack.jansen@cwi.nl> parents: 2753 diff changeset	1353 }
20ca58edc855 Generated anew Jack Jansen <jack.jansen@cwi.nl> parents: 2753 diff changeset	1354
3295 3ca111e0b1a7 - Added color window/pixmap support Jack Jansen <jack.jansen@cwi.nl> parents: 3268 diff changeset	1355 OptResObj_Convert(v, p_itself)
3ca111e0b1a7 - Added color window/pixmap support Jack Jansen <jack.jansen@cwi.nl> parents: 3268 diff changeset	1356 PyObject *v;
3ca111e0b1a7 - Added color window/pixmap support Jack Jansen <jack.jansen@cwi.nl> parents: 3268 diff changeset	1357 Handle *p_itself;
3ca111e0b1a7 - Added color window/pixmap support Jack Jansen <jack.jansen@cwi.nl> parents: 3268 diff changeset	1358 {
3ca111e0b1a7 - Added color window/pixmap support Jack Jansen <jack.jansen@cwi.nl> parents: 3268 diff changeset	1359 if ( v == Py_None ) {
3ca111e0b1a7 - Added color window/pixmap support Jack Jansen <jack.jansen@cwi.nl> parents: 3268 diff changeset	1360 *p_itself = NULL;
3ca111e0b1a7 - Added color window/pixmap support Jack Jansen <jack.jansen@cwi.nl> parents: 3268 diff changeset	1361 return 1;
3ca111e0b1a7 - Added color window/pixmap support Jack Jansen <jack.jansen@cwi.nl> parents: 3268 diff changeset	1362 }
3ca111e0b1a7 - Added color window/pixmap support Jack Jansen <jack.jansen@cwi.nl> parents: 3268 diff changeset	1363 if (!ResObj_Check(v))
3ca111e0b1a7 - Added color window/pixmap support Jack Jansen <jack.jansen@cwi.nl> parents: 3268 diff changeset	1364 {
3ca111e0b1a7 - Added color window/pixmap support Jack Jansen <jack.jansen@cwi.nl> parents: 3268 diff changeset	1365 PyErr_SetString(PyExc_TypeError, "Resource required");
3ca111e0b1a7 - Added color window/pixmap support Jack Jansen <jack.jansen@cwi.nl> parents: 3268 diff changeset	1366 return 0;
3ca111e0b1a7 - Added color window/pixmap support Jack Jansen <jack.jansen@cwi.nl> parents: 3268 diff changeset	1367 }
3ca111e0b1a7 - Added color window/pixmap support Jack Jansen <jack.jansen@cwi.nl> parents: 3268 diff changeset	1368 p_itself = ((ResourceObject )v)->ob_itself;
3ca111e0b1a7 - Added color window/pixmap support Jack Jansen <jack.jansen@cwi.nl> parents: 3268 diff changeset	1369 return 1;
3ca111e0b1a7 - Added color window/pixmap support Jack Jansen <jack.jansen@cwi.nl> parents: 3268 diff changeset	1370 }
3ca111e0b1a7 - Added color window/pixmap support Jack Jansen <jack.jansen@cwi.nl> parents: 3268 diff changeset	1371
3006 20ca58edc855 Generated anew Jack Jansen <jack.jansen@cwi.nl> parents: 2753 diff changeset	1372
2267 7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1373
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1374 void initRes()
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1375 {
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1376 PyObject *m;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1377 PyObject *d;
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1378
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1379
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1380
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1381
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1382
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1383 m = Py_InitModule("Res", Res_methods);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1384 d = PyModule_GetDict(m);
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1385 Res_Error = PyMac_GetOSErrException();
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1386 if (Res_Error == NULL \|\|
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1387 PyDict_SetItemString(d, "Error", Res_Error) != 0)
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1388 Py_FatalError("can't initialize Res.Error");
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1389 }
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1390
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1391 /* ========================= End module Res ========================= */
7411b6a06920 Committed a more or less working version. Guido van Rossum <guido@python.org> parents: diff changeset	1392

Mercurial > cpython-lru_cache-weakref

annotate Mac/Modules/res/Resmodule.c @ 4566:6403c94de50d legacy-trunk