Kaydet (Commit) bf068b15 authored tarafından Guido van Rossum's avatar Guido van Rossum

Got rid of the Resource and Sound interfaces, in favor of the ones

generated from the header files (with some hand-holding :-).
üst cf27c2d5
......@@ -27,153 +27,8 @@ OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
#include "Python.h"
#include "macglue.h"
#include <errno.h>
#include <OSUtils.h> /* for Set(Current)A5 */
#include <Resources.h>
#include <Memory.h>
#include <Sound.h>
#ifndef __MWERKS__
#define SndCallBackUPP ProcPtr
#define NewSndCallBackProc(x) (x)
#define SndListHandle Handle
#endif
/*----------------------------------------------------------------------*/
/* General tools */
static PyObject *MacOS_Error; /* Exception MacOS.Error */
/*----------------------------------------------------------------------*/
/* Resource objects */
typedef struct {
PyObject_HEAD
Handle h;
} RsrcObject;
staticforward PyTypeObject RsrcType;
#define Rsrc_Check(r) ((r)->ob_type == &RsrcType)
static RsrcObject *
Rsrc_FromHandle(Handle h)
{
RsrcObject *r;
if (h == NULL)
return (RsrcObject *)PyErr_Mac(MacOS_Error, (int)ResError());
r = PyObject_NEW(RsrcObject, &RsrcType);
if (r != NULL)
r->h = h;
return r;
}
static void
Rsrc_Dealloc(RsrcObject *r)
{
PyMem_DEL(r);
}
static PyObject *
Rsrc_GetResInfo(RsrcObject *r, PyObject *args)
{
short id;
ResType type;
Str255 name;
if (!PyArg_ParseTuple(args, ""))
return NULL;
GetResInfo(r->h, &id, &type, name);
return Py_BuildValue("(is#s#)",
(int)id, (char *)&type, 4, name+1, (int)name[0]);
}
static PyObject *
Rsrc_AsBytes(RsrcObject *r, PyObject *args)
{
long len;
PyObject *rv;
char *cp;
if (!PyArg_ParseTuple(args, "l", &len))
return NULL;
HLock(r->h);
cp = (char *)*r->h;
rv = PyString_FromStringAndSize(cp, len);
HUnlock(r->h);
return rv;
}
static PyObject *
Rsrc_AsString(RsrcObject *r, PyObject *args)
{
PyObject *rv;
unsigned char *cp;
if (!PyArg_ParseTuple(args, ""))
return NULL;
HLock(r->h);
cp = (unsigned char *)*r->h;
rv = PyString_FromStringAndSize((char *)cp+1, cp[0]);
HUnlock(r->h);
return rv;
}
static PyMethodDef Rsrc_Methods[] = {
{"GetResInfo", (PyCFunction)Rsrc_GetResInfo, 1},
{"AsString", (PyCFunction)Rsrc_AsString, 1},
{"AsBytes", (PyCFunction)Rsrc_AsBytes, 1},
{NULL, NULL} /* Sentinel */
};
static PyObject *
Rsrc_GetAttr(PyObject *r, char *name)
{
return Py_FindMethod(Rsrc_Methods, r, name);
}
static PyTypeObject RsrcType = {
PyObject_HEAD_INIT(&PyType_Type)
0,
"Resource", /*tp_name*/
sizeof(RsrcObject), /*tp_basicsize*/
0, /*tp_itemsize*/
/* methods */
(destructor)Rsrc_Dealloc, /*tp_dealloc*/
0, /*tp_print*/
(getattrfunc)Rsrc_GetAttr, /*tp_getattr*/
0, /*tp_setattr*/
0, /*tp_compare*/
0, /*tp_repr*/
0, /*tp_as_number*/
0, /*tp_as_sequence*/
0, /*tp_as_mapping*/
0, /*tp_hash*/
};
static PyObject *
MacOS_GetResource(PyObject *self, PyObject *args)
{
ResType rt;
int id;
Handle h;
if (!PyArg_ParseTuple(args, "O&i", PyMac_GetOSType, &rt, &id))
return NULL;
h = GetResource(rt, id);
return (PyObject *)Rsrc_FromHandle(h);
}
static PyObject *
MacOS_GetNamedResource(PyObject *self, PyObject *args)
{
ResType rt;
Str255 name;
Handle h;
if (!PyArg_ParseTuple(args, "O&O&", PyMac_GetOSType, &rt, PyMac_GetStr255, &name))
return NULL;
h = GetNamedResource(rt, name);
return (PyObject *)Rsrc_FromHandle(h);
}
/*----------------------------------------------------------------------*/
/* Miscellaneous File System Operations */
......@@ -219,263 +74,6 @@ MacOS_SetCreatorAndType(PyObject *self, PyObject *args)
return Py_None;
}
/*----------------------------------------------------------------------*/
/* SoundChannel objects */
/* Convert a SndCommand argument */
static int
GetSndCommand(PyObject *v, SndCommand *pc)
{
int len;
pc->param1 = 0;
pc->param2 = 0;
if (PyTuple_Check(v)) {
if (PyArg_ParseTuple(v, "h|hl", &pc->cmd, &pc->param1, &pc->param2))
return 1;
PyErr_Clear();
return PyArg_ParseTuple(v, "hhs#", &pc->cmd, &pc->param1, &pc->param2, &len);
}
return PyArg_Parse(v, "h", &pc->cmd);
}
typedef struct {
PyObject_HEAD
SndChannelPtr chan;
} SndChObject;
staticforward PyTypeObject SndChType;
#define SndCh_Check(s) ((s)->ob_type == &SndChType)
static SndChObject *
SndCh_FromSndChannelPtr(SndChannelPtr chan)
{
SndChObject *s = PyObject_NEW(SndChObject, &SndChType);
if (s != NULL)
s->chan = chan;
return s;
}
static void
SndCh_Cleanup(SndChObject *s, int quitNow)
{
SndChannelPtr chan = s->chan;
if (chan != NULL) {
void *userInfo = (void *)chan->userInfo;
s->chan = NULL;
SndDisposeChannel(chan, quitNow);
if (userInfo != 0)
PyMem_DEL(userInfo);
}
}
static void
SndCh_Dealloc(SndChObject *s)
{
SndCh_Cleanup(s, 1);
PyMem_DEL(s);
}
static PyObject *
SndCh_DisposeChannel(SndChObject *s, PyObject *args)
{
int quitNow = 1;
if (PyTuple_Size(args) > 0) {
if (!PyArg_ParseTuple(args, "i", &quitNow))
return NULL;
}
SndCh_Cleanup(s, quitNow);
Py_INCREF(Py_None);
return Py_None;
}
static int
SndCh_OK(SndChObject *s)
{
if (s->chan == NULL) {
PyErr_SetString(MacOS_Error, "channel is closed");
return 0;
}
return 1;
}
static PyObject *
SndCh_SndPlay(SndChObject *s, PyObject *args)
{
RsrcObject *r;
int async = 0;
if (!PyArg_ParseTuple(args, "O!|i", RsrcType, &r, &async))
return NULL;
if (!SndCh_OK(s))
return NULL;
SndPlay(s->chan, (SndListHandle)r->h, async);
Py_INCREF(Py_None);
return Py_None;
}
static PyObject *
SndCh_SndDoCommand(SndChObject *s, PyObject *args)
{
SndCommand c;
int noWait = 0;
OSErr err;
if (!PyArg_ParseTuple(args, "O&|i", GetSndCommand, &c, &noWait))
return NULL;
if (!SndCh_OK(s))
return NULL;
err = SndDoCommand(s->chan, &c, noWait);
return PyErr_Mac(MacOS_Error, (int)err);
}
static PyObject *
SndCh_SndDoImmediate(SndChObject *s, PyObject *args)
{
SndCommand c;
OSErr err;
if (!PyArg_ParseTuple(args, "O&", GetSndCommand, &c))
return 0;
if (!SndCh_OK(s))
return NULL;
err = SndDoImmediate(s->chan, &c);
return PyErr_Mac(MacOS_Error, (int)err);
}
static PyMethodDef SndCh_Methods[] = {
{"close", (PyCFunction)SndCh_DisposeChannel, 1},
{"SndDisposeChannel", (PyCFunction)SndCh_DisposeChannel, 1},
{"SndPlay", (PyCFunction)SndCh_SndPlay, 1},
{"SndDoCommand", (PyCFunction)SndCh_SndDoCommand, 1},
{"SndDoImmediate", (PyCFunction)SndCh_SndDoImmediate, 1},
{NULL, NULL} /* Sentinel */
};
static PyObject *
SndCh_GetAttr(PyObject *s, char *name)
{
return Py_FindMethod(SndCh_Methods, s, name);
}
static PyTypeObject SndChType = {
PyObject_HEAD_INIT(&PyType_Type)
0,
"SoundChannel", /*tp_name*/
sizeof(SndChObject), /*tp_basicsize*/
0, /*tp_itemsize*/
/* methods */
(destructor)SndCh_Dealloc, /*tp_dealloc*/
0, /*tp_print*/
(getattrfunc)SndCh_GetAttr, /*tp_getattr*/
0, /*tp_setattr*/
0, /*tp_compare*/
0, /*tp_repr*/
0, /*tp_as_number*/
0, /*tp_as_sequence*/
0, /*tp_as_mapping*/
0, /*tp_hash*/
};
/*----------------------------------------------------------------------*/
/* Module */
typedef struct {
long A5;
PyObject *callback;
PyObject *channel;
SndCommand cmd;
} cbinfo;
static int
MySafeCallback(arg)
void *arg;
{
cbinfo *p = (cbinfo *)arg;
PyObject *args;
PyObject *res;
args = Py_BuildValue("(O(hhl))",
p->channel, p->cmd.cmd, p->cmd.param1, p->cmd.param2);
res = PyEval_CallObject(p->callback, args);
Py_DECREF(args);
if (res == NULL)
return -1;
Py_DECREF(res);
return 0;
}
static pascal void
MyUserRoutine(SndChannelPtr chan, SndCommand *cmd)
{
cbinfo *p = (cbinfo *)chan->userInfo;
long A5 = SetA5(p->A5);
p->cmd = *cmd;
Py_AddPendingCall(MySafeCallback, (void *)p);
SetA5(A5);
}
static PyObject *
MacOS_SndNewChannel(PyObject *self, PyObject *args)
{
SndChannelPtr chan;
short synth;
long init = 0;
PyObject *callback = NULL;
cbinfo *p = NULL;
SndCallBackUPP userroutine = 0;
OSErr err;
PyObject *res;
if (!PyArg_ParseTuple(args, "h|lO", &synth, &init, &callback))
return NULL;
if (callback != NULL) {
p = PyMem_NEW(cbinfo, 1);
if (p == NULL)
return PyErr_NoMemory();
p->A5 = SetCurrentA5();
p->callback = callback;
userroutine = NewSndCallBackProc(MyUserRoutine);
}
chan = NULL;
err = SndNewChannel(&chan, synth, init, userroutine);
if (err) {
if (p)
PyMem_DEL(p);
return PyErr_Mac(MacOS_Error, (int)err);
}
res = (PyObject *)SndCh_FromSndChannelPtr(chan);
if (res == NULL) {
SndDisposeChannel(chan, 1);
PyMem_DEL(p);
}
else {
chan->userInfo = (long)p;
p->channel = res;
}
return res;
}
static PyObject *
MacOS_SndPlay(PyObject *self, PyObject *args)
{
RsrcObject *r;
OSErr err;
if (!PyArg_ParseTuple(args, "O!", &RsrcType, &r))
return NULL;
err = SndPlay((SndChannelPtr)NULL, (SndListHandle)r->h, 0);
return PyErr_Mac(MacOS_Error, (int)err);
}
static PyObject *
MacOS_SndControl(PyObject *self, PyObject *args)
{
int id;
SndCommand c;
OSErr err;
if (!PyArg_ParseTuple(args, "iO&", &id, GetSndCommand, &c))
return NULL;
err = SndControl(id, &c);
if (err)
return PyErr_Mac(MacOS_Error, (int)err);
return Py_BuildValue("(hhl)", c.cmd, c.param1, c.param2);
}
/*----------------------------------------------------------------------*/
/* STDWIN High Level Event interface */
......@@ -489,10 +87,10 @@ extern void (*_w_high_level_event_proc)(EventRecord *);
static PyObject *MacOS_HighLevelEventHandler = NULL;
static void
MacOS_HighLevelEventProc(EventRecord *erp)
MacOS_HighLevelEventProc(EventRecord *e)
{
if (MacOS_HighLevelEventHandler != NULL) {
PyObject *args = Py_BuildValue("(s#)", (char *)erp, (int)sizeof(*erp));
PyObject *args = PyMac_BuildEventRecord(e);
PyObject *res;
if (args == NULL)
res = NULL;
......@@ -570,13 +168,8 @@ MacOS_AcceptHighLevelEvent(self, args)
static PyMethodDef MacOS_Methods[] = {
{"AcceptHighLevelEvent", MacOS_AcceptHighLevelEvent, 1},
{"GetResource", MacOS_GetResource, 1},
{"GetNamedResource", MacOS_GetNamedResource, 1},
{"GetCreatorAndType", MacOS_GetCreatorAndType, 1},
{"SetCreatorAndType", MacOS_SetCreatorAndType, 1},
{"SndNewChannel", MacOS_SndNewChannel, 1},
{"SndPlay", MacOS_SndPlay, 1},
{"SndControl", MacOS_SndControl, 1},
#ifdef USE_STDWIN
{"SetHighLevelEventHandler", MacOS_SetHighLevelEventHandler, 1},
#endif
......@@ -593,7 +186,7 @@ MacOS_Init()
d = PyModule_GetDict(m);
/* Initialize MacOS.Error exception */
MacOS_Error = PyString_FromString("MacOS.Error");
MacOS_Error = PyMac_GetOSErrException();
if (MacOS_Error == NULL || PyDict_SetItemString(d, "Error", MacOS_Error) != 0)
Py_FatalError("can't define MacOS.Error");
}
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment